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Die Reihe Anwendung programmierbarer Taschenrechner 
bietet dem Benutzer dieses Rechnertyps eine reichhaltige 
Palette von Aufgabenstellungen aus den Anwendungs- 
gebieten der Natur- und Wirtschaftswissenschaften an, 
für die Programme zur numerischen Lösung entwickelt 
werden. 


Jeder Band behandelt ein in sich abgeschlossenes 
Themengebiet: Nach einer kurzen Einführung in die Theorie 
der jeweiligen Problemstellung wird der Lösungsalgorithmus 
entwickelt, das Programm dargestellt und kommentiert. 


Neben der direkten Nutzung der hier veröffentlichten 
Programme will diese Reihe den Leser wirkungsvoll bei 
der Ausarbeitung eigener Programmvarianten unterstützen. 
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Vorwort 


Die mit dem vorliegenden Band 1 eröffnete Reihe Anwendung programmierbarer Taschenrechner 
bietet dem Leser eine breite Palette von Aufgabenstellungen aus Gebieten der Natur- und 
Wirtschaftswissenschaften, für die Programme zur numerischen Lösung erarbeitet wurden. Dieser 
Band führt den Leser in das Programmieren von Taschenrechnern ein, die nach dem Prinzip der 
Umgekehrten Polnischen Notation (UPN-Technik) arbeiten, und bringt Beispiele aus den Bereichen 
der angewandten Mathematik, der Finanzmathematik, der Statistik und der Informatik. Dabei 
wird besonders Gewicht auf eine rationelle und leicht überschaubare Programmierung als Hilfs- 
mittel zur Problemlösung gelegt. Eine in dieser Weise als Handwerkszeug verstandene Programmie- 
rung wird nicht zum Selbstzweck ausarten, sondern den Leser befähigen, auf Grund der mühelosen 
Reproduzierbarkeit der Lösung alle wünschenswerten Variantenrechnungen einer fundierten 
Ergebnisaussage nutzbar zu machen. 


Das Buch wendet sich insbesondere an Ingenieure in der Industrie und den verschiedenen Verwal- 
tungsbereichen, die sowohl mit mathematisch-technischen wie auch mit mathematisch-betriebs- 
wirtschaftlichen Aufgabenstellungen konfrontiert werden. Studenten an Universitäten und Fach- 
hochschulen erhalten eine gründliche Einführung in die unterschiedlichen Funktionsmerkmale der 
Rechensysteme und erlernen das methodische Vorgehen und die praktische Rechnungsdurch- 
führung mit dem programmierbaren Taschenrechner. 


Dem Leser wird ein Nachschlagfundus mit Beispielen für programmierte Aufgabenlösungen aus 
einem breiten Anwendungsspektrum in die Hand gegeben. Die hierbei gegebenen Programmier- 
hinweise haben den Zweck, die Ausarbeitung spezieller, auf die eigene Problemstellung zuge- 
schnittene Programme zu erleichtern. 


Zu den Aufgabenstellungen werden die mathematischen Grundlagen nur soweit dargestellt, wie es 
zur Programmierung des Lösungsalgorithmus erforderlich ist. Zum tieferen Eindringen in die 
jeweilige Thematik wird auf die vorhandene Fachliteratur verwiesen. 


Die angegebenen Programme sind auf die UPN-Rechner HP67 und HP97 mit externem Magnet- 
karten-Speicher zugeschnitten. Der Verfasser geht davon aus, daß die den Rechnern zugehörigen 
Bedienungshandbücher und die hierzu vorliegende Sekundärliteratur alle Fragen zur eigentlichen 
Bedienung und praktischen Einübung umfassend beantworten. Deshalb baut dieses Arbeitsbuch 
eine Brücke zwischen den objektiven Möglichkeiten der Technik (Hardware) und den subjektiven 
Fähigkeiten zu einer rechnergerechten Problemanalyse und rationellen Problemlösung (Software). 


Dank gebührt Herrn Dr.-Ing. Ch. Fuchs für sachkundige Anregungen zu Programmierung und 
Rechnereinsatz sowie Herrn Dipl.-Ing. K. Lange für interessante Hinweise zur Einkommensteuer- 
berechnung. Für viele fruchtbringende Fachdiskussionen und Anregungen danke ich Herrn Dipl.-Ing. 
J. Hildebrandt. Weiter habe ich zu danken Fräulein £. Breuer und Frau B. Krauthausen für die 
Übernahme der Schreibarbeiten sowie Fräulein G. Stüsser für die Ausführung der Zeichenarbeiten. 
Danken möchte ich auch Herrn H.-J. Niclas, Lektor im Verlag Vieweg, für die Anregung zu der 
Arbeit und dem Verlag für die gute Aufnahme. Nicht zuletzt gilt ein besonderer Dank meiner 
Frau und meinen Kindern, die mir größtes Verständnis über viele Monate der Manuskriptbearbei- 
tung entgegengebracht haben. 


Helmut Alt 


Aachen-Brand, Februar 1979 
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1 Historischer Überblick 


Die Anfänge der Entwicklung von Rechenmaschinen gehen zurück auf Wilhelm Schickard (1592— 
1635), Professor an der Universität Tübingen [1, 2]. Er baute im Jahre 1623 eine Maschine ‚‚Rechen- 
uhr‘ für die vier Grundrechenarten, bei der für das Addier- und Subtrahierwerk erstmalig das deka- 
dische Zählrad verwendet wurde. Bl/aise Pascal (1623-1662) vollendete seine erste Rechenmaschine 
für Addition und Subtraktion im Jahre 1645. Ein Vorläufer unserer heutigen Taschenrechner war 
Samuel Morland’s (1625-1695) Taschenrechenmaschine aus dem Jahre 1666. Diese war vom 
Pascalschen Typ, jedoch in den Abmessungen nur 3x 4 x 1/4 Inch groß und für Multiplikationen 
geeignet. Das Original ist im britischen Sciene Museum in London zu sehen. Eine schon fortge- 
schrittene Rechenmaschine, bei der die Arbeitsgänge der Zahleneinstellung und der Rechnung 
voneinander getrennt waren und mit der man nicht nur Additionen und Subtraktionen, sondern 
auch Multiplikationen ‚mühelos‘ und Divisionen „fast mühelos’ ausführen konnte, konstruierte 
Gottfried Wilhelm Leibniz (1646-1716) im Jahre 1672. Seine Motivation wird in einem Zitat aus 
dem Jahre 1671 besonders deutlich [3]: 


“Indignum enim est excellentium virorum horas servili calculandi labore perire, quia Machina 
adhibita vilissimo cuique secure transcribi posset.” 


Zu deutsch: 

„Eines geistig hochstehenden Mannes ist es unwürdig, seine Zeit zu vertun mit sklavischer 
Rechenarbeit, denn mit einer Maschine könnte auch der Allerdümmste die Rechnung sicher 
ausführen.‘ 


Nach nahezu 250-jähriger Pause in der Rechenmaschinenentwicklung konzentrierte man sich ab 
der Jahrhundertwende auf die Verbesserung der mechanischen Realisierung der Vierspezies-Rechner. 


Im Sinne einer neuen Entwicklungsdimension gab Konrad Zuse (geb. 1910) im Jahre 1941 mit der 
ersten voll funktionstüchtigen programmgesteuerten Rechenanlage der Welt, der Zuse Z3 in Relais- 
technik, den Startschuß zu einer stürmischen Entwicklung auf dem Gebiet elektronischer Groß- 
rechenanlagen. 

Diese Entwicklung war im wesentlichen gekennzeichnet durch die Fortschritte, die auf dem Sektor 
der Halbleitertechnologie erzielt wurden. 

Mit der Verfügbarkeit hochintegrierter monolithischer Schaltkreise war der Verwirklichung leistungs- 
fähiger wissenschaftlicher Rechner im Taschenformat die Tür geöffnet. Im Jahre 1970 wurden bereits 
14.000 Schaltelemente auf einer Fläche von 17 Quadratmillimetern untergebracht und Zeiten für 
eine Rechenoperation im Nanosekundenbereich erzielt. Zu dieser Zeit erschienen auch die ersten 
wissenschaftlichen Taschenrechner auf dem Markt, freilich noch zu einem Preis in der Größenord- 
nung des Monatseinkommens eines Ingenieurs. Die folgenden Jahre waren durch eine rasche Zu- 
nahme von Typenvielfalt, Leistungsfähigkeit und Preisverfall auf diesem Markt gekennzeichnet. 

Im Jahre 1974 erschienen die ersten programmierbaren Taschenrechner sowohl ohne als auch mit 
externen Speicher. Bei den Folgetypen wurde dann insbesondere der verfügbare Speicherplatz und 
der Programmierkomfort weiter gesteigert. 


Der Taschenrechner trat ab 1972 unaufhaltsam an die Stelle des bewährten Rechenschiebers, der 
im Jahre 1654 von Robert Bissaker eingeführt wurde. In der von Seth Partridge im Jahre 1657 
verbesserten Form, mit beweglicher Zunge zwischen den beiden an den Enden fixierten Körper- 
teilen, wurde er in den folgenden 300 Jahren, nicht zuletzt wegen des ebenso mechanisch trivialen 
wie mathematisch genialen Aufbaus, zu einer höchst nützlichen „Rechenmaschine‘, die insbeson- 
dere im ingenieurwissenschaftlichen Bereich unverzichtbar geworden war. 

Die Anwendung des Rechenschiebers im studentischen Bereich geht seit der offiziellen Zulassung 
der Taschenrechner als Hilfsmittel zu den Prüfungen an wissenschaftlichen Hochschulen und Fach- 
hochschulen immer mehr zurück. Wegen der digitalen Anzeige elektronischer Rechner ist die Über- 
sicht über einzelne Bereichsdekaden, wie man sie vom Rechenschieber gewöhnt war, nicht mehr 
gegeben. Die Abschätzung des Einflusses einzelner Faktoren auf das Rechenergebnis ist daher nicht 
mehr in anschaulicher Form möglich. Es bleibt zu hoffen, daß der hohe didaktische Nutzen, den 
viele Generationen aus der analogen Arbeitsweise mit dem Rechenschieber und dem Zwang zum 
Mitdenken in Größenordnungen zogen, bei der Anwendung des Taschenrechners auf andere Weise 
erreicht wird. 

Inzwischen ist man an einem Punkt angelangt, wo die ausgereifte Hardware der programmierbaren 
Rechner eine intensive Investition in Software-Arbeiten rechtfertigt. Auf diesem Sektor ist prak- 
tisch ein unbegrenztes Innovationspotential vorhanden, aus dem in Zukunft wohl alle erdenklichen 
Anwendungen erwachsen werden. 

Die persönliche Nachvollziehbarkeit schwieriger Berechnungen und vielfältiger logischer Abhängig- 
keiten wird die berechtigte Sorge gegenüber dem schwarzen Kasten EDV in weiten Bereichen mil- 
dern können. 

Die zukünftige Hardware-Entwicklung wird wohl auf eine weitere Vergrößerung des verfügbaren 
Speicherplatzes, einer Steigerung des Programmierkomforts im Hinblick auf Makrobefehle mit An- 
lehnung an höhere Programmiersprachen und einer Verbesserung der Ausgabemöglichkeiten im 
Hinblick auf alphanumerische Ausdrücke hinzielen. Das vorhandene Software-Potential wird immer 
stärker eine Programmkompatibilität zu den Folgegenerationen erfordern. 


2 Einführung 


2.1 Rechensysteme 


Ein wesentliches Unterscheidungsmerkmal zwischen Taschenrechnern etwa gleicher Leistungsaus- 
stattung ist das verwendete Rechensystem. In echter Konkurrenz auf dem Markt wissenschaftlicher 
Taschenrechner stehen heute zwei Systeme: 


a) Die algebraische Notation in Verbindung mit dem Algebraischen-Operations-System (AOS) 
b) Die Umgekehrte Polnische Notation (UPN) in Verbindung mit einem vierstufigen Stackregister 


2.1.1 Funktionsmerkmale der AOS-Technik 


Die AOS-Technik [4, 5, 6] organisiert selbsttätig einen hierarchischen Aufbau der Rechnung unter 
Beachtung der algebraischen Regeln. Eine Bestimmungsgleichung kann bis zu einer für die praktische 
Anwendung unbedeutende Einschränkung (z.B. 9 verschachtelte Klammerebenen für bis zu 8 un- 
vollständige Operationen) von links nach rechts aus der schriftlichen Vorlage in den Rechner über- 
tragen werden. Zwischenergebnisse werden nur angezeigt, wenn die Operationen in einer Ebene ab- 
geschlossen werden. Ein Bruch in der Eingabesystematik entsteht jedoch dadurch, daß vor Betäti- 
gung einer Funktionstaste das Argument der Funktion eingegeben sein muß. 


2.1.2 Rechnungsablauf in der AOS-Technik 


Die Funktionsweise des ADS-Systems sei an der Aufgabe 6 +5 (9 — 8) erläutert. 
Zur Lösung dieser Aufgabe sind folgende 12 Tasten zu betätigen: 


OIBISIEIBIEIEIGEIEN NIE 


Nach den Regeln der Algebra kann mit der Berechnung erst begonnen werden, wenn die erste rechts 
stehende schließende Klammer eingegeben ist. Dies erfordert eine Zwischenspeicherung aller vorher 
eingegebenen Zahlen und Rechenbefehle. Die AOS-Technik bedient sich zur Nachhaltung aller un- 
vollständigen Operationen der internen Verarbeitungsregister, auch flexible Speicher genannt. In 
unserem Beispiel werden 4 unvollständige Operationen in folgender Weise in Anspruch genommen. 


Es ie IE) U DJ E 


Interne 
Verarbei- 
tungs- 
register 


Anzeige 


Wie man erkennt, wird als erstes Zwischenergebnis der abgeschlossene Klammerausdruck angezeigt. 
Dabei wird die algebraische Hierarchie, Division vor Subtraktion, automatisch beachtet. Das Zwi- 
schenergebnis der Division wird nicht angezeigt. Diese Eigenart wird von Nachteil sein, wenn auch 
dieses Zwischenergebnis von besonderem Interesse ist. Durch Einfügen einer zweiten Klammerebene 
... (6 +3)) kann dieser Nachteil jedoch vermieden werden. 

Nach dem Eingeben des Gleichheitszeichens wird das Endergebnis angezeigt und alle flexiblen 
Speicher gelöscht. Auch hier wurde wieder das Zwischenergebnis der Multiplikation nicht ange- 
zeigt. Die Steuerung der einzelnen Verarbeitungsstufen außerhalb des Rechenablaufs nach den 
Gesetzen der algebraischen Hierarchie wird durch die linken Klammern bewirkt. Die rechten Klam- 
mern veranlassen die Ausrechnung und Anzeige der Zwischenergebnisse. Da die Eingabe des Gleich- 
heitszeichens alle unvollständigen Operationen abschließt, brauchen die rechten Klammern unmit- 
telbar vor dem Gleichheitszeichen bei Verzicht auf die Anzeige der entsprechenden Zwischener- 
gebnisse nicht eingegeben zu werden. 

Zusammenfassend kann gesagt werden, daß die Eingabe nach der AOS-Technik lediglich die Über- 
tragung der Vorlage ohne jede Nebenregeln auf die Tastatur des Rechners erfordert. Damit ist diese 
Organisationstechnik hinsichtlich der Bedienungsart sicher nicht zu überbieten. 

Bei näherem Hinsehen, insbesondere bei umfangreicheren technisch-wissenschaftlichen Aufgaben- 
stellungen, wird jedoch erkennbar, daß dieser Vorteil mit einem weitgehenden erzwungenen Ver- 
zicht auf die Verfolgung des Rechnungsablaufs bezahlt wird. 

Anderenfalls muß die vorgegebene Aufgabe in ihrer Schreibweise auf Kosten einer höheren Zahl 
von Klammersetzungen erst rechnergerecht bearbeitet werden. 


2.1.3 Funktionsmerkmale der UPN-Technik 


Die Umgekehrte Polnische Notation (UPN) geht auf den polnischen Mathematiker Jan Lukasiewicz 
(1878-1956) zurück, der ab 1946 an der Royal Irish Academy in Dublin lehrte und grundlegende 
Arbeiten auf dem Gebiet der formalen Logik veröffentlichte. Die formale Logik strebt danach, 

die größtmögliche Exaktheit zu erreichen im Sinne Aristotelischer Vernunftschlüsse: 


„Alle Menschen sind sterblich, 
Socrates ist ein Mensch, 
folglich: 

Socrates ist sterblich.‘’ 


Als formalistisches Hilfsmittel entwickelte Lukasiewicz im Jahre 1929 eine symbolische, klammer- 
freie Schreibweise für logische Aussagen, die er fortan in seinen Arbeiten benutzte [7]. Diese ein- 
deutige klammerfreie Anordnung von Anweisungen zu mathematischen Operationen ist als Prefix- 
Schreibweise mit Operator, Operand, Operand-Struktur oder als Postfix-Schreibweise mit Operand, 
Operand, Operator-Struktur möglich. Mit Umgekehrter Polnischer Notation ist die Postfix-Schreib- 
weise angesprochen. Die in der Algebra übliche Schreibweise mit Operand, Operator, Operand- 
Struktur, wie z.B. in a + b, bezeichnet man dagegen als eingeschobene Anordnung. Die Umgekehrte 
Polnische Notation hat als Postfix-Schreibweise gegenüber der eingeschobenen Anordnung Vorteile, 
da sie ohne Klammersetzungen frei von Mehrdeutigkeiten ist [8, 9, 10]. 


Der logische Ablauf zur Berechnung des Ausdruckes 3:4 + 7: 9 läßt sich mit Hilfe des Stackregisters 
wie folgt darstellen: 


Stack-Register 


Anweisung 

Nimm 

Nimm Stack-up 
Multipliziere Stack-down 
Nimm Stack-up 
Nimm 12 Stack-up 
Multipliziere Stack-down 
Addiere Stack-down 


Die Umgekehrte Polnische Notation führt auf folgende Schreibweise: 


34x 79x + 


Der logische Ablauf läßt sich in Form eines Graphen nach Bild 2.1.1 verdeutlichen. 


warn 
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\ Rx 
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„ 
we =»X Bild 2.1.1 
+ =—e+ Darstellung einer eingeschobenen und nachgestellten Anordnung 


Die waagerechte Projektion der Eckpunkte ergibt die Schreibweise der umgekehrten polnischen 
Notation und die senkrechte Projektion führt zu der üblichen algebraischen Schreibweise. 


Die einzelnen Operanden müssen bei der Eingabe durch einen Separator (als ENTER-Taste reali- 
siert) voneinander abgetrennt werden [11, 12]. Die Verarbeitung der Eingaben erfolgt bei der 
UPN-Technik stets nach dem in Bild 2.1.2 angegebenem Ablaufschema: 


Operand 
eingeben 


Ist 

Operation möglich 
und 

gewollt? 


Operation 
ausführen 


Neuer 
Operand 
gefordert? 


Bild 2.1.2 
Ablaufschema der UPN-Technik 


2.1.4 Rechnungsablauf in der UPN-Technik 


Zur Lösung der unter Abschnitt 1.1.2 genannten Aufgabe sind bei Rechnern mit UPN-Technik 
folgende 11 Tasten zu betätigen: 


[a] [enter] [6 | [enter] BIETE] 


Der Ablauf der Rechnung in der UPN-Technik entspricht genau demjenigen, den man bei eigener 
Kopfrechnung auch vollziehen würde. Der Anwender muß die algebraische Hierarchie selbst be- 
achten und die Reihenfolge der Eingaben hiernach organisieren. Es wird zunächst der Klammer- 
ausdruck eingegeben. Da sowohl nach Eingabe der 9 wie auch nach Eingabe der 6 noch keine Ope- 
ration möglich ist, müssen diese beiden Eingaben durch die Betätigung der ENTER-Taste von den 
nachfolgenden Eingaben separiert werden. Nach Eingabe der 3 ist die nach den Regeln der Algebra 
vorrangige Division möglich. Sie wird nach Eingabe des Operators * unmittelbar ausgeführt und 
das Ergebnis 2 angezeigt. Anschließend ist auch die Subtraktion möglich. Sie wird ebenfalls nach 
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Eingabe des Operators — unmittelbar ausgeführt und das Ergebnis angezeigt. Um den natürlichen 
Ablauf der Rechnung fortzusetzen, muß die 5 als nächster Operand eingegeben werden. Die Multi- 
plikation mit dem vorher berechneten Klammerausdruck ist nun möglich und wird nach Eingabe 
des Operators x unmittelbar ausgeführt und das Ergebnis 35 angezeigt. In gleicher Weise werden 
nun die 6 als letzter Operand und der Operator + zur Veranlassung der Addition eingegeben. 
Hiernach erscheint das Endergebnis 41 in der Anzeige. 


2.1.5 Stack-Register 


Um die Operanden für die jeweils eingegebene Operation verfügbar zu halten, setzt die UPN-Technik 
ein Stack-Register (Stapelregister) voraus. Bei den UPN-Taschenrechner der Firma Hewlett-Packard 
umfaßt das Stack-Register vier abrufbare Arbeitsregister, die mit den Buchstaben X,Y,Z und T 
bezeichnet werden. 

Das X-Register dient als Rechenregister für einparametrige Operationen. Nur im X-Register befind- 
liche Werte werden in dem gewählten Ausgabemodus angezeigt. Das Y-Register dient als Speicher- 
register für Zwischenergebnisse und in Verbindung mit dem X-Register als Rechenregister für zwei- 
parametrige Operationen. Da nach Ausführung einer zweiparametrigen Grundoperation der vor- 
malige Inhalt des Y-Registers nicht mehr benötigt wird, werden die Inhalte der darüber angeordne- 
ten Z- und T-Register um eine Stufe heruntergezogen (Stack wurde um eine Stufe abgearbeitet). 
Das Z-Register dient als Speicherregister für Zwischenergebnisse. Beim Abarbeiten des Stacks wird 
der Inhalt des Z-Registers an das Y-Register übergeben. 

Das T-Register dient wie das Z-Register als weiteres Speicherregister für Zwischenergebnisse mit der 
zusätzlichen Eigenart, daß durch Abarbeiten des Stacks der Inhalt des T-Registers zwar auch in das 
unterlagerte Z-Register übergeben wird, aber zusätzlich im T-Register selbst erhalten bleibt. 

Die Anordnung des Stack kann man sich als übereinander angeordnete Register vorstellen (Bild 2.1.3): 


Information 
ist verloren 


Speicher- und Duplizierregister 


Speicherregister 
Speicher- und Rechenregister 


Anzeige- und Rechenregister 


Bild 2.1.3 Stack- und Last x-Register 


In Verbindung mit dem Stack-Register steht ein Last x-Register. In diesem Hilfsregister wird bei 
Veränderungen im Stack-Register jeweils der vorherige Inhalt des X-Registers übertragen und steht 
dort abrufbar zur Verfügung. 

Wir wollen die Vorgänge im Stack-Register an Hand der unter Abschnitt 2.1.4 angegebenen Ein- 
gaben verfolgen: 


9 ENTER ni 
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Es ist zu beachten, daß die auf ENTER folgende Eingabe den Inhalt des X-Registers überschreibt 

und keine Anhebung der Stack-Inhalte bewirkt. Nach Ausführung einer Grundoperation wird das 
Stack-Register jeweils um eine Stufe abgearbeitet. Da das T-Register nicht erreicht wurde, werden 
auch bei dem Abbauen des Stacks Nullen nachgezogen. 


2.1.6 Gesamtbewertung 


Bei der Anwendung von Rechnern mit UPN-Technik ist die Kenntnis der algebraischen Grund- 
gesetze erforderlich. Unter dieser Premisse hat der Anwender weitgehende Freiheiten, den Rech- 
nungsablauf zu bestimmen. Zwischenergebnisse werden in jedem Fall ohne Zusatzmaßnahmen 
angezeigt. 

Der Rechnungsablauf verläuft damit synchron mit dem gedanklichen Nachvollziehen der Lösung. 
Dies führt insbesondere bei technisch-wissenschaftlicher Aufgabenstellung oft schon während der 
Rechnung zu entscheidenden Aussagen, die zu einer Bestätigung, Änderung oder zum vorzeitigen 
Abbruch der Rechnung Anlaß geben. Für ein verantwortlich zu vertretendes Rechnungsergebnis 
bedeutet die gedankliche Nachvollziehbarkeit eine unverzichtbare Forderung ingenieurmäßigen 
Arbeitens. 

Aus pädagogisch-didaktischer Sicht ist der zwangsweise ständige Gebrauch des algebraischen Grund- 
wissens von nicht zu unterschätzendem Wert und daher sicher nicht als Nachteil zu werten. 

Eine generelle Bevorzugung eines der beiden konkurrierenden Rechensysteme ist insbesondere unter 
Hinzuziehung finanzieller Gesichtspunkte nicht möglich. 

Aus den dargelegten Gesichtspunkten sollte jedoch hervorgehen, daß eine verblüffend anspruchslose 
Handhabung nicht gegen die Vorteile eines verantwortlichen Mitdenkens ausgespielt werden sollte. 
In den vergangenen Rechenschieber-Jahrzehnten bezog sich das notwendige Mitdenken sowohl auf 
den Rechenablauf als auch auf die Zahlenwertbildung. Die elektronischen Rechner erlauben es, die 
gesamte Konzentration der Strategie des Lösungsweges zu widmen. Um das Gesetz des Handelns 
nicht ganz aus der Hand zu geben und um einer blinden Computer-Gläubigkeit vorzubeugen, sollte 
die Lösungsstrategie weiter dort bleiben, wo das Ergebnis zu verantworten ist. Diesem Anliegen trägt 
die UPN-Technik in besonderem Maße Rechnung. 


3 Programmiertechnik 


3.1 Speichertechnik 


Im Anschluß an die Problemanalyse, also vor Beginn der Programmierung, sollten die im Programm 
benötigten Datenspeicher festgelegt werden. Dabei sind drei Speichergruppen zu unterscheiden: 


— Permanente Datenspeicher 
— Ergebnisspeicher 
— Hilfsgrößenspeicher 


Permanente Datenspeicher 


Permanente Datenspeicher sind für solche Daten vorzusehen, die während der Programmbearbei- 
tung als variable oder konstante Daten für die Berechnung benötigt werden. Hierzu gehören system- 
bezogene Konstanten und problembezogene Eingabedaten. 

Um ein Programm ohne wiederholte Erneuerung der Dateneingabe erneut ablauffähig starten zu 
können, ist es zweckmäßig, die permanenten Datenspeicher während der Programmbearbeitung 
nicht zu überschreiben. 


Ergebnisspeicher 


Ergebnisdaten sollten, soweit möglich, auch festgelegten Ergebnisspeichern zugewiesen werden. 
Diese Ergebnisspeicher dürfen bis zu dem Zeitpunkt, in dem das Ergebnis dort abgelegt ist, als 
Hilfsspeicher verwendet werden. 


Hilfsgrößenspeicher 


Während der Programmbearbeitung fallen im allgemeinen an mehreren Programmstellen benötigte 
Zwischenergebnisse an, die jedoch für den Benutzer ohne Interesse sind. Zur Verkürzung der 
Rechenzeit ist es daher zweckmäßig, solche Zwischenwerte nur einmal zu errechnen und dann 

in einen festgelegten Speicher verfügbar zu halten. 


3.2 Speicherarten 


Bei den Rechnertypen HP-67/97 unterscheidet man zwischen Primär- und Sekundärspeicher. Nur 
auf die Primärspeicher kann über die Speicheradressen O bis 9 direkt zugegriffen werden. Ein Wechsel 
dieser Definition kann über die Funktionstaste PS vorgenommen werden. Da keinem der beiden 
Speicherbereiche eine besondere Kennung beigegeben ist, kann man leicht die Übersicht darüber ver- 
lieren, welche der beiden Speicherbereiche gerade aktiv ist. Ein mehrmaliger Programmstart würde 
dann dazu führen, daß man vorher definierte permanente Datenspeicher ungewollt überschreibt und 
damit einen ordnungsgemäßgen Programmablauf verhindert. Daher ist es bei größeren Programmen, 
die permanente Datenspeicher benötigen und auf beide Speicherbereiche zurückgreifen, zweckmäßig, 
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konsequent mit indirekter Speicheradressierung zu arbeiten oder unmittelbar nach der Start- 
adresse eine Ausrichtung und Definition der Speicherbereiche programmtechnisch vorzusehen. 
Dies kann man über einen Wertvergleich zwischen einem programmtechnisch vorgegebenen Wert 
und einem als permanente Daten abgespeicherten Wert verwirklichen: 

Zum Beispiel in STO 3 sei der Wert 7,9 als permanente Date im Primärbereich über eine Datenkarte 
eingelesen. Nach dem Start eines Programms bei Label A soll sichergestellt werden, daß für die zu- 
nächst folgenden Programmschritte unabhängig vom Anfangsstatus der in Bezug auf die Datenkarte 
als Sekundärbereich definierte Speicherbereich aktiv ist: 


001 LBL A Anfangsadresse 

002 bis 004 7.9 programmierte Konstante 

005 RCL3 gerufene Konstante 

006 fx=y Vergleich, falls ja: nächste Anweisung, falls nein: übernächste Anweisung 
007 fPZS Speicherbereichwechsel 


Ab hier ist der sekundäre Speicherbereich aktiviert 


Um die Forderung zu erfüllen, wird in den Programmschritten 002 bis 004 der Wert 7,9 programm- 
technisch vorgegeben. Im Schritt 005 wird mit der Anweisung RCL 3 der Inhalt von Speicher 3 in das 
X-Register übernommen. Hierbei ist noch unbekannt, welcher Speicherbereich zur Zeit aktiv ist. An- 
schließend wird über die Äquivalenzabfrage x = y abgefragt, ob in dem angeforderten Speicher 3 

der Wert 7,9 enthalten war. Falls dies zutrifft, war der auf der Datenkarte als Primärbereich defi- 
nierte Speicherbereich aktiv. Daher wird in Programmschritt 007 ein Umtausch der Speicherbe- 
reiche vorgenommen. Für die nun folgenden Programmischritte ist also der sekundäre Speicherbe- 
reich in Bezug auf die Datenkarte aktiv. 

Bei negativem Ergebnis der Äquivalenzabfrage bei Programmschritt 006 würde die Anweisung zum 
Umtausch der Speicherbereiche übersprungen und das Programm mit dem in Bezug auf die Daten- 
karte aktiven Sekundärbereich fortgesetzt. 

Diese automatische Speicherbereichsdefinition setzt natürlich voraus, daß unter der Speicheradresse 
des nicht zum Vergleichstest herangezogenen Primär- bzw. Sekundärspeichers mit Sicherheit ein 
anderer Wert abgespeichert ist. 

Zur Unterscheidung zwischen den in Bezug auf die Datenkarte jeweils aktiven Primär- oder Sekundär- 
speicherbereichen ist es zweckmäßig, bei aktivem Sekundärspeicherbereich die Speicheradressen in 
der Anweisungsliste durch eine Strich-Markierung besonders zu kennzeichnen (z.B. STO 3). 

Um die eindeutige Speicherbereichdefinition nicht zu gefährden, sollte ein Programm nicht mit 

Hilfe einer willkürlichen Sprunganweisung an beliebiger Stelle gestartet werden. 


3.3 Indirekte Adressierung 


Das Indexregister (l-Register) bietet zusammen mit der Tastenfunktion (i) die Möglichkeit, wichtige 
Rechnerfunktionen wie Speichern, Inkrementieren, Dekrementieren, Springen, Unterprogrammauf- 
rufe und Arithmetik-Operationen mit indirektenAdressen auszuführen oder das Anzeigeformat in- 
direkt zu steuern. Dabei wird der Inhalt des Indexregisters als Adresse für die aufgerufene Funktion 
oder als Formatspezifikation interpretiert. Diese Möglichkeiten sind insbesondere bei der Program- 
mierung von Dateneingaberoutinen und zur Erzielung variabler Programmabläufe von großem 
Nutzen. Mit Hilfe der indirekten Adressierung können alle Speicher sowohl im Primärbereich 

7” =0Obis 9 für STO O bis STO 9 als auch im Sekundärbereich {1} = 10 bis 19 für STO 0’ bis 


1) {1} bedeutet: Inhalt von STO I 
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STO 9’ sowie alle Label {1} = O bis 19 für Label O bis 9, A bis E und a bis e, unmittelbar erreicht 
werden. Bei negativem Inhalt des Indexregisters können auch Rücksprünge ohne Inanspruchnahme 
von Labels programmiert werden. Auf die Besonderheiten hierzu wird im Abschnitt 3.8 Programm- 
verzweigungen näher eingegangen. 


3.4 Speicherregister-Arithmetik 


Der Entwicklung speicherplatzsparender Programme kommt die Möglichkeit, arithmetische Grund- 
operationen unmittelbar in den Speicherregistern auszuführen, sehr zu gute. Dieses Verfahren ist 
besonders dann vorteilhaft anzuwenden, wenn der Inhalt des X-Registers noch für andere Opera- 
tionen unverändert weiter verwendet werden soll. Eine Speicher-Register-Arithmetik-Operation 
z.B. STO x(i), belegt nur eine einzige Programmzeile. Es ist darauf zu achten, daß die Speicher- 
register-Arithmetik bei direkter Adressierung nicht auf die Speicher A bis E und | anwendbar ist. 


3.5 Programmaufrufe 


Jedes Programm muß durch ein Label mit einer nachfolgenden Marke Abis E, fa bis fe oder O bis 9 
als Anfangsadresse gekennzeichnet sein. 

Für Hauptprogramme ist es zweckmäßig, als Anfangsadressen nur die Marken A bis E oder fa bis fe 
zu verwenden. Nach den Aufrufen einer dieser Marken über die Tastatur im RUN-Modus wird der 
Rechner veranlaßt, den Programmspeicher nach dem ersten Auftauchen der entsprechenden Marke 
abzusuchen und dort mit der Ausführung der gespeicherten Programmanweisungen zu beginnen. 
Um die eindeutige Zuordnung nicht zu gefährden, sollte für jedes Hauptprogramm eine andere 
Marke verwendet werden. Damit können bis zu 10 Hauptprogramme selektiv im Programmspeicher 
aufgerufen werden. 


3.6 Dateneingabe 
Die Versorgung eines Programms mit Daten kann über vier Arten erfolgen: 


— Dateneingabe über externen Datenträger (Datenkarte) 

— Dateneingabe in bestimmte Speicher vor dem Programmstart 
— Datensetzung in Form von Programmanweisungen 

— Datenabrufe durch Programmunterbrechungen 


Dateneingabe über externen Datenträger (Datenkarte) 


Die Form der Dateneingabe über Magnetkarten als Datenträger wird gewählt, wenn das Programm 
auf viele permanente Daten zurückgreift. Nach dem Einlesen der Datenkarte im RUN-Modus kön- 
nen die Daten der einzelnen Speicher über die Tastatur gezielt verändert und über die Organisations- 
anweisung WRITE DATA wieder zurückgespeichert werden. Dabei werden normalerweise die Inhalte 
sämtlicher Primär- und Sekundärregister neu eingeschrieben. 

Es ist jedoch auch möglich, nur ein Teil der Daten von einer Magnetkarte in den Rechner zu über- 
tragen, während die Inhalte der übrigen Speicherregister unverändert bleiben. Hierzu muß eine 

Zahl zwischen O und 25 als Adresse in das I-Register eingespeichert werden. Mit der Organisations- 
anweisung MERGE übernimmt der Rechner dann die neuen Daten in STO O bis STO k, wenn der 
Inhalt des Indexregisters gleich k ist (O<Sk<25). 


11 


Dateneingabe in bestimmte Speicher vor dem Programmstart 


Die Form der Dateneingabe in bestimmte Speicher vor dem Programmstart wird meist für aktuelle 
problemorientierte Daten gewählt. Der besseren Übersichtlichkeit wegen, insbesondere im Hinblick 
auf die Beschriftung der Programmkarte, ist es im allgemeinen zweckmäßig, hierfür die Speicher 
STO A bisSTO E vorzusehen. Falls der Umfang des Programms es erlaubt, sollen diese Daten- 
speicher innerhalb der Programmbearbeitung nicht überschrieben werden, damit das Programm 
ohne wiederholte Dateneingabe mehrmals aufgerufen werden kann. 


Datensetzung in Form von Programmanweisungen 


Datensetzungen in Form von Programmanweisungen sind unzweckmäßig, da jede einzelne Ziffer 
sowie der Dezimalpunkt je eine Programmzeile belegen und dadurch der Programmspeichervorrat 
sehr unrationell verbraucht wird. Ausnahmen sind dann notwendig, wenn schon alle Datenspeicher 
verbraucht sind oder es sich um Daten mit nur einer oder wenigen Ziffern handelt. Bei vorheriger 
Abspeicherung einer im Programm benötigten Zahl in einem hierfür reservierten Speicher erfordert 
die Anforderung der Zahl nur eine einzige Programmzeile in Form einer RCL n-Anweisung. 


Datenabrufe durch Programmunterbrechungen 


Datenabrufe im Zuge der Programmbearbeitung an programmierten Haltepunkten sind grundsätz- 
lich möglich, haben jedoch den Nachteil, daß die Programmbearbeitung große Aufmerksamkeit 
des Benutzers verlangt. Außerdem müssen die Daten bei jedem Programmlauf wieder neu einge- 
geben werden. Um eine bessere Übersichtlichkeit über den Programmzustand an den Haltepunkten 
zu erzielen, ist es zweckmäßig, durch kleine Hilfsprogramme markante Display-Anzeigen vor den 
Unterbrechungen zu erzeugen (z.B. E10+*9 = 1111111111). Mit Hilfe der Pause-Anweisung kön- 
nen Daten auch automatisch von einer in den Rechner eingeschobenen Magnetkarte eingelesen 
werden. 


3.7 Ergebnisausgabe 


Da bei Taschenrechnern keine Klartextausgabe möglich ist, kommt es sehr darauf an, die Aufein- 
anderfolge der Ergebnisse sinnvoll zu organisieren. Dies trifft ganz besonders für den Rechner HP-67 
ohne Druckstreifen zu. Bei diesem Typ können als Unterscheidungsmerkmale zwischen mehreren 
Ergebnissen die Ausgabearten mit kurzer oder langer Pause alternativ gewählt werden. Die program- 
mierte lange Pause (mit blinkendem Dezimalpunkt} erzeugt auf dem Rechner HP-97 einen Ausdruck 
auf dem Papierstreifen. Als weitere Gliederungsmöglichkeit kann bei diesem Typ die SPACE-Anwei- 
sung dienen, die auf dem Papierstreifen eine Leerzeile erzeugt. Als besonders geeignetes Mittel zur 
Gliederung der Ergebnisse kann das Ausgabeformat mit Hilfe der DSP-Anweisung variiert werden. 


Damit können z.B. Geldbeträge grundsätzlich mit zwei Kommastellen, Zinssätze mit einer Komma- 
stelle und sonstige besondere Werte ohne Kommastelle ausgegeben werden. 


3.8 Programmverzweigungen 


Programmverzweigungen können durch unbedingte Sprünge, Unterprogrammaufrufe, als Ergebnis 
von Vergleichsoperationen oder Flag-Abfragen eingeleitet werden. 
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3.8.1 Unbedingte Sprünge 


Unbedingte Sprünge werden durch die GTO-Anweisung in Verbindung mit einer Sprungadresse er- 
zeugt. Bei direkter Adressierung enthält die Sprungadresse eine der 20 Label-Marken der Form O 
bis 9, A bis E oder a bis e. Daneben ist eine indirekte Adressierung der Form GTO (i) möglich. Ent- 
hält dabei das Indexregister I eine positive Zahl zwischen O und 19, so sucht der Rechner den Pro- 
grammspeicher auf das erste Auftreten derjenigen Marke ab, deren Adresse durch den Inhalt des 
Indexregisters gegeben ist. Die Programmausführung wird ab dieser Stelle fortgesetzt. 

Enthält das Indexregister eine negative Zahl zwischen -1 und —999, so springt der Rechner im 
Programmspeicher um die entsprechende Anzahl von Programmzeilen zurück und setzt die Aus- 
führung des Programms von dieser Stelle aus fort. Wenn auch diese Art der Programmierung bei 
Rücksprunganweisungen einen schnelleren Ablauf erbringt, ist doch der Nachteil zu beachten, daß 
nach Einschieben oder Löschen von Anweisungen innerhalb des Rücksprungbereiches der Inhalt 
des Indexregisters mit geändert werden muß, da sonst die Rücksprungposition nicht mehr stimmt. 
Durch jede Rücksprunganweisung wird eine Programmschleife erzeugt. 

Auch durch einen Unterprogrammaufruf GSB in Verbindung mit einer Marke O bis 9, AbisE, 

a bis e (markierter Unterprogrammaufruf) oder in Verbindung mit indirekter Adressierung der 
Form GSB (i) wird ein unbedingter Programmsprung ausgeführt. Im Gegensatz zur GTO-Anwei- 
sung wird das Programm nach dem Auffinden der nächsten RTN-Anweisung nicht angehalten, 
sondern kehrt zu der auf GSB folgenden Anweisung zurück. Aus einem Unterprogramm soll nicht 
mit einer GTO-Anweisung herausgesprungen werden, da dadurch die Kontrolle über die Wirkung 
der folgenden RTN-Anweisung verloren geht. Die nach Ausführung der GSB-Anweisung zuerst ge- 
fundene RTN-Anweisung bewirkt einen unbedingten Sprung zu der auf die rufende GSB-Anwei- 
sung folgende Programmzeile. 


3.8.2 Bedingte Sprünge 


Die Möglichkeit, abhängig vom Ergebnis einer Vergleichsoperation, zu verschiedenen Programm- 
adressen zu springen, verleiht dem Rechner die Qualität eines Automaten im Sinne von DIN 19 233 
[13]. Die vier elementaren Vergleichsoperationen gleich, ungleich, größer und kleiner, sind zwischen 
den Inhalten vom X- und Y-Register oder auch zwischen dem Inhalt des X-Registers und Null mög- 
lich (Ausnahme x < y, anstelle x<y). 

Im allgemeinen wird auf die Vergleichsoperation als nächster Programmschritt eine unbedingte 
Sprunganweisung der Form GTO a folgen. Diese Anweisung wird dann ausgeführt, wenn die in der 
Vergleichsabfrage formulierte Bedingung erfüllt ist, die Vergleichsabfrage also mit ja zu beantwor- 
ten ist. Andernfalls wird der auf die Vergleichsabfrage folgende Programmschritt übersprungen. 
Eine weitere Art, bedingte Sprünge auszuführen, ist durch die Inkrement-Anweisung ISZ und die 
Dekrement-Anweisung DSZ gegeben. Mit der ISZ (i) bzw. DSZ (i)-Anweisung wird der Inhalt des 
durch den Inhalt des Indexregisters | angesprochenen Speichers um 1 erhöht bzw. erniedrigt. Wenn 
der Inhalt des auf diese Weise indirekt adressierten Speichers nach Ausführung der ISZ- bzw. DSZ- 
Anweisung zwischen -1 und +1 liegt, überspringt der Rechner die nachfolgende Anweisung im 
Programmspeicher. 


3.8.3 Flag-Steuerung 


Neben den Vergleichsoperationen und den Inkrement- bzw. Dekrement-Anweisungen stehen soge- 
nannte Flag’s zur Verfügung, um bedingte Sprünge oder bedingt auszuführende Operation zu pro- 


13 


grammieren. Die Flag-Abfragen haben gegenüber den Vergleichsoperationen den Vorteil, daß der 
augenblickliche Inhalt der Rechenregister unabhängig von der Abfrage ist. Weiter bieten die Flags 
die Möglichkeit, den Programmablauf je nach Aufgabenstellung vor dem Start oder während einer 
Programmpause extrem zu beeinflussen. 

Es stehen vier Flags FO, F1, F2 und F3 zur Verfügung, die mit der Anweisung STF a gesetzt und 
mit der Anweisung CLF a gelöscht werden können. Die Flags 2 und 3 werden nach jeder Status- 
Abfrage F? a automatisch gelöscht. 

Das Flag 3 weist daneben noch die weitere Besonderheit auf, daß es bei jeder Dateneingabe, sei es 
vom Tastenfeld aus oder durch das Einlesen einer Datenkarte über den Kartenleser des Rechners, 
automatisch gesetzt wird. Mit diesem Flag kann der Programmablauf in Abhängigkeit von einer 
beliebigen Dateneingabe beeinflußt werden. 


3.9 Unterprogrammtechnik 


Ein erforderliches Hilfsmittel zur Minimierung des Programmumfangs ist die Programmierung mit 
Unterprogrammen. Ein Unterprogramm wird durch die GSB-Anweisung, gefolgt von einer der 
Marken O bis 9, A bis E oder a bis e, aufgerufen. Die Anfangsadresse besteht daher aus der Label- 
Anweisung und der im Aufruf angesprochenen Marke. Der Rücksprung in das rufende Programm 
wird durch die nächst folgende RTN-Anweisung bewirkt. Ein Unterprogramm mit den Anfangs- 
adressen A bis E oder a bis e kann auch als selbständiges Hauptprogramm über die entsprechende 
Adresse direkt aufgerufen werden. Einem Hauptprogramm können bis zu drei Unterprogramm- 
ebenen nachgeordnet sein. Ein Unterprogramm kann im Anschluß an die Adresse mit einer belie- 
bigen Anweisung beginnen. Daher ist z.B. die Programmierung eines Unterprogramms zur Redu- 
zierung des Programmspeicherplatzes schon dann zweckmäßig, wenn an zwei Stellen im Programm 
gieichartige Befehlsfolgen mit mehr als vier Anweisungen vorliegen. Bezeichnet man mit k die 
Häufigkeit gleichartiger Befehlsfolgen und mit n die Anzahl der Programmzeilen innerhalb dieser 
Folgen, so führt ein Unterprogramm zu einer geringeren Anzahl von Programmanweisungen, wenn 


gilt: k+2 
nn 


Wenn z.B. an 5 Stellen im Programm die Stackregister-Operationen + und — aufeinanderfolgen, so 
ist eine Übernahme dieser Anweisungsfolge in ein Unterprogramm bereits zweckmäßig: 


In der Unterprogrammvariante werden dann 5 GSB Anweisungen und 4 Unterprogrammanweisun- 
gen benötigt (Label a, +,—-, RTN), also insgesamt 9 Programmzeilen, wogegen sonst 5:2 = 10 Pro- 
grammzeilen erforderlich sind. 

Besondere Vorsicht ist beim Aufruf eines Unterprogramms geboten, wenn die Inhalte im Stack- 
register über die Unterprogrammbearbeitung hinaus noch verwendet werden sollen. Am besten ist 
es, insbesondere wenn zukünftige Programmänderungen nicht auszuschließen sind, hierauf ganz zu 
verzichten und die entsprechenden Werte vorher abzuspeichern. 

Um eine eindeutige Unterscheidung zwischen dem logischen Ende der Unterprogramme und dem 
logischen Ende der Hautprogramme zu gewährleisten, ist es zweckmäßig, die Hautprogramme mit 
der R/S-Anweisung abzuschließen. 

Ein Unterprogramm sollte nicht über eine Sprunganweisung verlassen werden, sondern immer über 
eine RTN-Anweisung. Anderenfalls würde die übergangene RTN-Anweisung bei einem späteren Auf 
ruf einen Rücksprung zu der vorherigen rufenden Adresse bewirken. 
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3.10 Fehlersuche 


Nach dem ersten Startversuch eines neu entworfenen Programms ist nicht unbedingt zu erwarten, 
daß der Rechner alle logischen Operationen in der gleichen Weise ausführt, wie der Programmierer 
es vorausgedacht hat. Die Umsetzung unserer intuitiven Denkprozesse in serielle Folgen von 
Tastenbetätigungen weist sicher hier und da Fehler auf. Der Rechner denkt leider nicht mit, führt 
aber dafür mit unübertrefflicher Gleichartigkeit exakt diejenigen Befehle aus, die über die Tastatur 
eingegeben wurden oder die sich als logische Konsequenz programmierter Operationen ergeben. 
Um hier schnell und sicher zum Ziel zu kommen, ist es zweckmäßig, überschaubare Programmteile, 
insbesondere alle Unterprogramme, eigenständig auf ihre Funktionsrichtigkeit zu prüfen. Dies ge- 
lingt besonders gut, wenn sowohl mittlere wie auch untere und obere Extremwerte als Prüfwerte 
eingesetzt werden. Für den Anfänger ist besondere Vorsicht beim Abarbeiten des Stack-Registers 
geboten. Es ist zweckmäßig, neben dem Programmlisting in einer Vierspaltenliste die Inhalte des 
Stack-Registers zu verfolgen und nach Registerarithmetik-Operationen, z.B. STO +5, auch diese 
Veränderungen nachzuhalten. Der Inhalt des X-Registers wird dadurch nicht verändert. Eine 

gute Hilfe, Fehlern auf die Spur zu kommen, ist durch die schrittweise Programmbearbeitung mit 
Hilfe der SST-Anweisung im RUN-Modus gegeben. Beim Rechnertyp HP-97 kann die schrittweise 
Bearbeitung mit dem Ausdrucken aller Zwischenergebnisse im Trace-Modus erreicht werden. Eine 
weitere Hilfe ist durch die Möglichkeit gegeben, vom Tastenfeld mit der Anweisung GTO .nnn 
jede beliebige Programmzeile oder mit der Anweisung GTO, gefolgt von einer Marke, jedes Label 
anspringen zu können. Ggf. ist es zweckmäßig, in der Entwurfsphase zusätzliche Ausgabebefehle 
(PAUSE oder PRINT) einzubauen, um wichtige Zwischenwerte gezielt überprüfen zu können. 


Der Austestung eines fertigen Programms sollte größte Aufmerksamkeit geschenkt werden. Hierbei 
ist insbesondere auf die richtige Bearbeitung extremer Eingabewerte zu achten. 


3.11 Dokumentation 


Eine gute Programmdokumentation ist die Basis jeder nutzbringenden Programmierung. Dies zu 
erreichen ist leider oft recht mühsam, da der Programmierer unmittelbar nach der Fertigstellung 
eines Programms so intensiv mit sämtlichen Eigenarten vertraut ist, daß er glaubt, für die zukünf- 
tige Anwendung auch ohne Dokumentation ausreichend gerüstet zu sein. 

Nach kurzer Zeit sind jedoch selbst die notwendigen Eingabeerfordernisse und Speicherzuordnun- 
gen nicht mehr gegenwärtig und müssen aus dem Programmlisting mühsam rekonstruiert werden. 
Neben der ausführlichen schriftlichen Dokumentation kommt der Beschriftung der Programmkar- 
ten und Datenkarten für die spontane Anwendung eines Programms große Bedeutung zu. Die Pro- 
grammkarte soll alle Startadressen und die anfallenden Ergebnisse in unmißverständlicher Form 
enthalten. Falls zu dem Programm eine Datenkarte eingelesen werden muß, so soll diese die Speicher- 
platzadressen der problembezogenen Daten lesbar ausweisen. 

Eine Kurzanleitung sollte folgende Punkte enthalten: 


Startadressen mit Hinweisen zu der Programmvariante, 

Eingabedaten und die zugehörigen Adressen, 

Permanente Daten und abgespeicherte Ergebnisse mit ihrer Speicherzuordnung, 

Ausgegebene Ergebnisse und ihre Ausgabeart (kurze Pause, lange Pause bzw. Ausdruck) und 
Hinweise zur Anzeige nach STOP-Befehlen und Hinweise zum erneuten Programmstart mit 
R/S-Anweisung oder über eine Startadresse, 

5. Status-Angaben zu den Flags, zu dem verwendeten Winkelmodus und zu dem Anzeigeformat, 
soweit von den Standardsetzungen abgewichen wird. 


BERND 
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4 Angewandte Mathematik 


4.1 Quadratische und kubische Gleichungen 


Quadratische Gleichungen 
Ausgehend von der allgemeinen Form einer quadratischen Gleichung 
Ax? +Bx+C=0 (4.1.1) 


wird zunächst durch Division der Gleichungen durch den Koeffizienten von x? die Normalform 
gebildet: 


x? +ax+b=0 (4.1.2) 

mit 

a 2 (4.1.3) 
c 

be (4.1.4) 


Damit folgt für die beiden Lösungswerte 


Fr Tu 
xa=-2: (5) -5 (4.1.5) 


Kubische Gleichungen 
Ausgehend von der Normalform einer kubischen Gleichung 
x®+Ax? +Bx+C=0 (4.1.6) 


wird die programmierte Lösung in Abhängigkeit vom Wert ihrer Diskriminante A über zwei ver- 
schiedene Lösungsformeln berechnet [14]. 
Für die Diskriminante A gilt 


2 3 
4-(5) +(3) (4.1. 
mit 

1,2 
a=B-zA (4.1.8) 
b=-C+A°-2AB (4.1.9) 
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1. Für den Fall A>O existieren eine reelle und zwei konjugiert komplexe Wurzeln, die mit der 
Cardanischen Formel berechnet werden: 


ee (4.1.10) 
3 
1 A,.1 
2° -zla+ßl-+j, V3la-B) (4.1.11) 
mit 


ar Y-3*v2 (4.1.12) 
BE V-3-v2 (4.1.13) 


2, Für den Fall A<O existieren drei reelle Wurzeln, die über einen trigonometrischen Lösungs- 
ansatz berechnet werden: 


x,=2 2 0009-5 (4.1.14) 


x2 = 2/3 00s(p+ 120°) -5 (4.1.15) 
x, =2)/ -3c0ste+ 240°)-3 (4.1.16) 


y = 1 arccos ——— (4.1.17) 


4.1.1 Programmbeschreibung 


Die beiden in Tabelle 4.1.1 angegebenen Programme zur Lösung der quadratischen und kubischen 
Gleichungen umfaßen zusammen 205 Programmzeilen und lassen sich daher gemeinsam auf einer 
Programmkarte des HP-67/97 abspeichern. 

Das Programm zur Lösung quadratischer Gleichungen wird mit Label A in Zeile 001 gestartet. Es 
umfaßt 43 Programmzeilen. Daran anschließend beginnt mit der Startadresse Label B das Programm 
zur Lösung kubischer Gleichungen von Zeile 044 bis 205. Die Koeffizienten A, Bund C nach GI. 
(4.1.1 oder 4.1.6) müssen vor dem Programmstart für beide Varianten in die Speicher STO A, 

STO B und STO C eingegeben werden. Mit den Anweisungen 003 bis 014 wird der Wurzelradikant 
gemäß GI. (4.1.5) gebildet. Ist dieser kleiner Null, so sind die beiden Lösungen konjugiert komplex. 
Für diesen Fall werden der Realteil in Zeile 034 und die imaginären Anteile der beiden Lösungs- 
werte in den Zeilen 039 und 042 ausgegeben. Mit dem Aufruf des Unterprogramms Label 2 wird 
für diesen Fall in Zeile 204 als Trennungsmarkierung eine Ausgabezeile 1111... in der Anzeige bzw. 
Ausdruck erzeugt. Falls zwei reelle Lösungen existieren, werden diese mit den Anweisungen in den 
Zeilen 023 und 027 ausgegeben. 
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Tabelle 4.1.1 Anweisungsliste „‚Gleichungen zweiten und dritten Grades’ 


2.Grad 88i 
882 


. 


#LBLA 
SPC 
683  RELB 
684  RÜLA 
05 = 
d86 2 
er =: 
688 CHS 
685 ENT? 
Bi6  &2 
Bil RELE 
612 RÜLA 
3 = 
4 - 
815 3x8? 
reis 6T08 
7 8 
BE - 
613 Kr 
626 LSTK 
Bio + 
622 STOD 
623 PRIK=DX, 
624 SPC 
625 xer 
626  STOE 
827 PRIX=DX, 
628 RS 
629 »LBL6 
036 CHS 
EEF 7 
632 xer 
035  STOD 
934 PRIX=DX, 
035 Kr 
636 6582 
BR 
638  STOE 
633  PRTX=D X 
646 CHS 
841 STOI 
642 PRIX, 
643 R/ 
645 SPC 
646 RÜLB 
647 RÜLA 
648 STO8 
9 x 
856  STOB 
651 3 
652 5T:8 
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853 
854 
855 
856 
057 
858 
059 
866 
861 
862 
863 
864 
865 
666 
867 
865 


* 185 

= 186 
sT01 187 
RCLC 186 
RCLA 183 
STx6 118 
RCLB 111 
x 112 

3 113 

* 114 

= 115 
RCL& liö 
2 117 

x 118 

2 113 

Fü 128 

* 121 

+ 122 
sT02 123 
2 124 

* 125 
$T05 126 
x? 127 
RCLI 128 
3 123 

* 136 
3 131 

dal 132 
5T08 133 
+ 134 
5703 135 
8? 136 
6701 137 
RCL2 138 
RCLB 139 
cHs 146 
TA 141 
2 142 

x 143 

* 144 
CHS 145 
C05= 146 
3 147 

* 148 
5T04 149 
ReLI 158 
3 151 

+ 152 
CHS 153 
A 154 

2 155 

x 156 


5T08 
RCL4 
£0$ 
x 
RCLE 
STOD 


PRTK=DXı 


SPC 
RCL4 
1 
2 
6 
+ 
C0S 
RCL& 
x 
RCLE 


STOE 


PRTK=D X, 


SPC 
RCL4 
2 
4 
6 
+ 
c0$ 
RCLO 
x 
RCLB 


STOI 


PRTX=DX3 


R/S 
*LBLi 
RCL3 
‘x 
5T08 
RELS 


65Ba 
ST06 
RCLB 
RCL5 
+ 
CHS 
65Ba 
5107 
RCL& 
+ 
ENTt 


157 
158 
159 
168 
161 
162 
163 
164 
165 
166 
167 
168 
169 
178 
171 
172 
173 
174 
175 
176 
177 
178 
179 
186 
181 
182 
183 
184 


sTol 

PRTA=DXZ; 
CHS 

PRTK=DXZ; 
RzS 


UP 185 


186 


187 
185 
189 
198 


191 
192 
193 
194 
195 
196 


#LBLa 
>68? 
6T08 

$FZ 
CHS 
“LBL& 
3 
17& 
yx 
F2? 
CHS 
RTN 


up 197 


198 
199 
286 
261 
282 
263 
204 
265 
286 


#LBL2 
EEX 

i 

ö 
ENTt 
9 
PRTX 
RTN 
RS 


In dem Programm zur Lösung kubischer Gleichungen werden zunächst die Hilfsgrößen a, b und die 
Diskriminante A gemäß den Gin. (4.1.8, 9, 7) gebildet. Die Werte a werden in Zeile 055 nach STO 1, 
b in Zeile 071 nach STO 2 und A in Zeile 083 nach STO 3 abgespeichert. Über die Abfrage der Dis- 
kriminante auf größer Null in Zeile 084 werden die beiden Lösungsvarianten — Cardanische Formel 
oder trigonometrischer Ansatz — ausgewählt. Für den Fall, daß drei reelle Wurzeln existieren, wird 
der Programmteil 086 bis 139 durchlaufen und die Lösungswerte X} ,X2, %3 in den Zeilen 112, 125 
und 138 ausgegeben. Das logische Programmende ist dann mit Zeile 139 erreicht. Falls die Diskrimi- 
nante größer Null ist, d.h. die Lösung besteht aus einer reellen und zwei konjugiert komplexen 
Wurzeln, wird der Programmteil mit den Anweisungen ab Zeile 140 bis 184 durchlaufen. 

Der reelle Lösungswert x, wird in Zeile 161 und der Realteil der beiden konjugiert komplexen 
Lösungswerte wird in Zeile 170 ausgegeben. Danach wird durch den Unterprogrammaufruf in Zeile 
171 eine Ausgabezeile 1111 ... erzeugt und anschließend die beiden imaginären Anteile ausgegeben. 


4.1.2 Testbeispiele 


Eingaben: 1STOA 

1STOB 

1STOC 
Start: Lösung zu: x +x+1=0 
Ergebnisse: xı =0,5 + j 0,866 


%a = 0,5 - j 0,866 
Rechenzeit: rund 5 Sekunden 


Start: [8 ] Lösung zu: x +x? +x+1=0 
Ergebnisse: %=7 

%=0+j1 

%=0-j1 
Rechenzeit: rund 15 Sekunden 
Eingaben: 5STOA 

10STOB 

2STOC 

Start: Lösung zu: 5x? + 10x+2=0 
Ergebnisse: x] = 0,2254 

%a = 1,7746 
Start: Lösung zu: x? +5x? + 10x+2=0 
Ergebnisse: x, = 0,2240 


X2 = 2,3880 + j 1,7966 
X%3 = — 2,3880 - j 1,7966 


Eingaben: - 4STOA 
-11STOB 
30osToCc 
Start: Lösung zu: x? - 4x? - 11x +30=0 
xı= 5 
%2=3 
%= 2 
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4.2 Lineare Gleichungssysteme bis vierter Ordnung 


Zur Lösung linearer Gleichungen wird das Gaußsche Eliminationsverfahren zur Erzielung einer 
dreiecksfaktorisierten Koeffizientenmatrix angewandt. Hierbei wird von dem allgemeinen System 
vierter Ordnung ausgegangen: 


a11ı%ı + A12%2 + A13X3 + A1a%a = Yı 


=. _ (4.2.1) 
azıX%ı + | daa% 23 [833 X3 + agaXa = Ya 


| | 
a41%ı + | Aa2%2 + |AusX3 + AgaXa = Ya 


21 Saal, i P ; ; 
Die erste Zeile wird mit dem Faktor ron multipliziert und von der i-ten Zeile subtrahiert. Diesen 


Vorgang nennt man Dreiecksfaktorisierung, da mit fortschreitender Anwendung alle Koeffizienten 
unterhalb der Diagonalen verschwinden, so daß schließlich folgendes System vorliegt: 


b22%2 + Da3%X3 + bauXa = Y3 
MR Le (4.2.2) 
| ee! ba4Xa = y3 
| 
| | baa Xa = Ya 


Aus dem dreiecksfaktorisierten Gleichungssystem lassen sich durch rückwärtige Auflösungen alle 
Unbekannten bestimmen. Damit die Rechnung nicht wegen einer Division durch Null mit Error- 
Anzeige abgebrochen wird, ist das Gleichungssystem vorher so zu ordnen, daß in den Diagonal- 
gliedern der einzelnen Gleichungen Werte mit maximalem Betrag stehen. 

Für die Unbekannte x, bis x; gilt: 


* 


PT (4.2.3) 
baa 
—ba34X 
ga (4.2.4) 
b33 
y3 — baa%Xa — ba3 X 
ee 2 = D2a%Xa — D23X3 (4.2.5) 
b22 
yi = b14aXa — B13%X3 — b12X 
g% 1 14%4 = D13X3 7 D12%2 (4.2.6) 


b14 


4.2.1 Programmbeschreibung „Lineare Gleichungssysteme bis vierter Ordnung” 


Im allgemeinen Fall eines Gleichungssystems vierter Ordnung sind 20 Eingabeparameter zu verarbe 
ten. Damit sind alle numerisch adressierten Speicher belegt. Zur rationellen Eingabe und Abspeichı 
rung dieser Werte ist es zweckmäßig, ein besonderes Eingabeprogramm als Unterprogramm vorzu- 
sehen. Da das Programm auch gleichzeitig für Gleichungen dritter und zweiter Ordnung verwendba 
sein soll, sind entsprechende Einsprungstellen zu beachten. 

Für Systeme mit vier Unbekannten erfolgt der Start über Label D in Programmzeile 001. Als Merk 
mal wird das Flag 1 gesetzt. Mit dem Aufruf des Unterprogramms Label E in Zeile 005 wird die 
Dateneingabe angefordert. Das Programm hält mit der Anzeige des Wertes O als Adresse für die 
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Tabelle 4.2.1 Anweisungsliste ‚„‚Lineare Gleichungssysteme bis vierte Ordnung‘ 


Unb._ 864 
862 
865 
864 
685 
886 
807 
866 
863 
618 
6il 
612 
613 
did 
615 
eis 
617 
818 
Bis 
626 
821 
822 
623 
B24 
825 
625 
827 
828 
623 
836 
831 
832 
633 
634 
835 
835 
637 
635 
635 
648 
o41 
842 
643 
044 
845 
646 
647 


xLBLD 


Sri 
4 
STOE 
6SBE 
RCLS 
RCLB 


STOR 
RÜLI 
x 
ST-6 
RCLA 
RCL2 
x 
sT-7 
RCLA 
RCL3 
x 
ST-8 
RELA 
RCL4 


x 
5T-3 
1 
8 
STol 
ReLi 
RCLB 


STon 
RCLI 


A 
ISZI 
ST-i 
RCLA 
RCLZ 

x 
ISZI 
ST-i 
RCLA 
REL3 

x 
ISZI 
ST-i 
RCLA 
RCL4 


x 
ISZI 
ST-i 
1521 
RCLi 
RCLB 


sTon 
RCLI 


857 x 
858 ISZI 
0859 ST-i 
868 RLLA 
81  RLLZ 
862 x 
863 ISZI 
864  ST-i 
665 RLLA 
B66 RELS 
867 x 
868  ISZI 
869  ST-i 
676 RCLA 
671  RCL4 
872 x 
673 1521 
674 ST-i 
876 Fl? 
77 6708 
878 3 
73  STOE 
666 6SBE 
661 x#LBLö 
882 SFi 
683 1 
854 1 
885 STOI 
666 RLLi 
667 RELE 
855 * 
665 STon 
836  REL7 
651 x 
6932 ISZ21 
8933 ST-i 
034  RCLA 
6935 RCLE 
856 x 
637 ISZI 
835  ST-i 
839  RLLA 
188 RCLI 
161 x 
162  ISZI 
163 ST-i 
164  ISZI 
165 ISZI 
166 RCLi 
167 _ RCLO 
188 * 
183  STOA 
118 RCL? 
111 x 
112 182 


113  ST-i 
114 RCLA 
115 RCLS 
li6 x 
117 182 
118 ST-i 
113  R£LA 
128 RCLI 
121 x 
122 18521 
123  ST-i 
2Unb. 124 #LBLB 
125 Fi? 
126  6T08 
127 2 
126 STOE 
129 6SBE 
138 xLBL& 
131 CFi 
132 P2S 
133 | RELR 
134 | REL2 
135 * 
136 | STüR 
137 | RCL3 
135 x 
135 | ST-8 
146 | RiLa 
141 | RCL4 
142 x 
143 | ST-3 
144 | RCLI 
145 | RCLS 
146 * 
147 | STOD 
148 | RCL3 
143 x 
158 CHS 
151 | REL4 
152 + 
153 | REL2 
154 * 
155 | STOC 
156 P2S 
157 2 
158  RCLE 
159 Act? 
166  6T02 
iel RCLG 
162  RÜL? 
163 x 
164  RELD 
165  RCLB 
166 x 
167 + 
168 CHS 


UP für 2 


Eingabe 


163 
178 
171 
172 
173 
174 
175 
176 
177 
178 
179 
188 
181 
182 
183 


RCLI 
+ 
RCL6 


STOB 
3 
RCLE 
A£r? 
6T03 
RCLB 
RCL1 

x 
RÜELC 
RCELZ 

x 

+ 
RCLD 
RCLS3 

x 

+ 
CHS 
RCL4 


+ 
RCLE 


STOR 
PRTA=DX, 
#LBL3 
RCLB 
PRTA=DX, 
uLELZ 
RELE 
PRTX=DX3 
RCLD 
PRTÄ=DX,, 
RS 
wLELE 
DSP8 
CHS 
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Abspeicherung des Koeffizienten a}, an. Nach Eingabe dieses Koeffizienten und Betätigung der 
R/S-Taste wird der Eingabewert mit Hilfe der indirekten Adressierung in Zeile 215 nach STO O 
abgespeichert und es erscheint der monoton folgende Adressenwert 1 in der Anzeige. Dieser Ab- 

lauf wird fortgesetzt, bis der Wert y„, mit der Adresse STO 19 eingegeben wurde. Infolge der Ver- 
neinung der Abfrage in Zeile 220 wird das Programm in Zeile 006 am Anfangspunkt der Gauß- 
Elimination fortgesetzt. 

Bei Zeile 074 sind alle Koeffizienten in der ersten Spalte unter a,; gleich Null. An dieser Programm- 
stelle wird die Berechnung von Gleichungssystemen dritter Ordnung gestartet. Falls das Flag 1 ge- 
setzt ist, wird der Unterprogrammaufruf für die Eingabe übersprungen. 

Bis zur Zeile 123 wird die zweite Spalte unterhalb der Hauptdiagonalen mit Nullen aufgefüllt. In 
Zeile 124 ist mit Label B die Startadresse für die Berechnung von 2 Gleichungen mit 2 Unbekann- 
ten erreicht. 

Ab Zeile 144 beginnt die rückwärtige Auflösung der Gl. (4.2.3). Der zuerst ermittelte Wert x, wird 
in STO D und die folgenden Werte x3 werden inSTO C, x» inSTO B und x, inSTO A abgespeichert. 
Mit den Anweisungen 195 bis 204 werden alle Rechenergebnisse ausgegeben. 

Die Koeffizienten werden in die Primärspeicher STO O bis STO 9 und in die Sekundärspeicher 

STO 10 bis STO 19 nach folgendem Schema abgespeichert: 


Koeffizienten von x 


4. Ordnung 


a .Ord 
10,11 [12 13 14 2. Ordnung 


15116117 18 19 


Während der Programmbearbeitung werden die abgespeicherten Daten überschrieben. Bei Programm- 
start durch Betätigung der Taste C für Gleichungssysteme dritter Ordnung beginnt die Dateneingabe 
mit der Speicheradresse STO 6 und bei B mit STO 12. Die folgenden Zeilen beginnen jeweils mit 

der ersten Zeilenadresse (10 bzw. 15), so daß dann ein- bzw. zweimal die R/S-Taste zusätzlich zu 
betätigen ist. 


4.2.2 Testbeispiel 


Das folgende Gleichungssystem vierter Ordnung ist zu lösen: 


3x1 +5%2 -6%3 + 4x4 = 17 
4x1 = 4X2 + 7X3 = 12x4 = 3 
2x1 +6%2 -6%3 = 6%, = 13 
10x} — 2X2 +8xX3 + 2x4 = 23 


Start: [Do] 


AnzeigeO Eingabe 3, R/S 
Anzeige 1 Eingabe 5, R/S 
Anzeige 2 Eingabe -6, R/S 
Anzeige 3 Eingabe 4, R/S 


Anzeige 18 Eingabe 2, R/S 
Anzeige 19 Eingabe 23, R/S 
Anzeige 20 Beginn der Rechnung 
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Tabelle 4.3.1 Anweisungsliste ‚„Newtonsches Iterationsverfahren‘ 


Eingabe #6! ALBLA 848  STOI 675  6T03— 
602 DS5F& 641  RCLi 686 wLBL2 
863 6 842 #LBL4 e81 STOB 
eö4  STOI 643  RÜLE 862 RÜLE 
685 xLBLa 844 x 683  6öBe 
66 RELI 645 DSZI 664  RCLB 
Br R-slar 646  6T0i 885 + 
885 STCi 647 _ 67102 e56  STOB 
663 RÜI 648 #LBLl 6&7__RIN 
6i6 STOD 849  RCLi UP 6888 «LBLE 
eil IS 858 + gk) 889 0) 
612 STba 851  6T04 096 __RTN 

Nullstelle @i3_ »LBLB 852 xLBL2 UP 89i ıLBle 
8i4 DSF2 653  RCLB g’x) 892 () 
815  STOE 054 + 633 RIN 
6iö sLBL5 855  STOC Speicher 894 xLBLD 
617 _ RECLE 656 RECLE 695 8 
618 S6SBC 857  S6SBE 635  STOI 
819  65Be 0586  RELC 637 %LBLd 
626 RCLE 859 5 838 2 
621 RELC 668 STOC 633 6 
622  RCLB BI RTN=DPI) 166 RELI 
823 * 862 «LBLe 16i x=Y? 
824 - 863  RELD 162 RS 
625  STOE 864  STOI 183  RCLi 
626  LSTK 065 RÜLE 184  x#0? 
627 ABS 866 RÜLI 165 6701 
628 PSEDIE 867 x 186 ISZI 
628  EEX 868 &LBL3 167 _ 6T0d 
638  CHS 663 DSZI 185 #LBLi 
631 5 976 6101 189 DSPB 
832 &r? 71 6702 18 x 
633 6705 le872 sLBil 111 PSE=D|| 
834  RCLE 673 RCLE 112: Ay 
035  PRIK=DX; 074 x 113  DSP2 
635 RS 75 Reli 114 PRTS=D|Ti] 

Polynom 837 #LBLC e76  RELI 115 1821 
038 STOE 877 x 116  6T0d 
035  RCLD 878 + 17 RS 


Nach rund 15 Sekunden werden folgende Ergebnisse ausgegeben: 
x%ı 7 2,0 
%2 = 3,0 
X, = 1,0 
X 7 0,5 


4.3 Newtonsches Iterationsverfahren 
Das Newton-Verfahren dient zur Verbesserung eines Näherungswertes für die Nullstelle (Wurzel) 
einer Funktion y = f (x). Die allgemeine Gleichung für den verbesserten Wurzelwert lautet [15]: 
Y 
en (4.3.1) 


n 


23 


Das Newton-Verfahren konvergiert, wenn gilt: 


yiy" 
y” 


<a<i (4.3.2) 


Falls f(x) ein Polynom n-ten Grades ist, läßt sich die iterative Wurzelverbesserung besonders günstig 
durch Anwendung des Horner-Schemas programmtechnisch ausführen: 


ax) Slam tan-ı)Xt..+a1}xXtao (4.3.3) 


fix)={Ina.x+(n-1)a,-ı]x +... +282}x +aı (4.3.4) 


Um das Programm für die Nullstellensuche mit Hilfe des Newtonschen Iterationsverfahrens allge- 
mein anwendbar zu machen, wird die Funktion y = f(x) als Summe aus einer Polynomfunktion 
p(x) und einer differenzierbaren Funktion g(x) angesetzt: 


yz=flx) =p(x) +glx) (4.3.5) 
y=f(x)=p'(x) +g'(x) (4.3.6) 


4.3.1 Programmbeschreibung „Newtonsches Iterationsverfahren‘ 


Das in Tabelle 4.3.1 angegebene Programm umfaßt neben dem eigentlichen Iterationsprogramm 
noch zwei Hilfsprogramme zur Dateneingabe und zur Abfrage der Speicherinhalte. 

Das Eingabeprogramm beginnt mit der Startadresse Label A in Programmzeile 001 und umfaßt die 
Anweisungen bis zur Zeile 012. Nach Betätigung der Starttaste A wird der Ablauf bei Zeile 007 mit 
der Anzeige des Indexregister-Inhaltes „‚O’' gestoppt. Über die Tastatur ist dann der Koeffizient ao 
der zu untersuchenden Funktion f(x) einzugeben. Nach Betätigung der R/S-Taste wird dieser Ein- 
gabewert mit Hilfe der indirekten Speicheradressierung in STO O abgespeichert. Nach Erhöhung 
des Indexregisters um 1 durch die ISZI-Anweisung in Zeile 011 wird durch einen Rücksprung nach 
Label a in Zeile 005 der nächste Polynomkoeffizient a, abgerufen. 

Sind alle Koeffizienten eingegeben, so ist vor dem Start des Iterationsprogramms durch Betätigung 
der Taste B ein Anfangswert für die Nullstellensuche über die Tastatur einzugeben. 

Dieser Anfangswert wird in Zeile 015 nach STO E, dem Ergebnisspeicher, abgelegt. 

Mit dem ersten Unterprogrammaufruf GSB C in Zeile 018 wird der Wert der Funktion f(x) für den 
Startwert xo gebildet. Das Unterprogramm kann gleichzeitig als eigenständiges Hauptprogramm für 
Polynomberechnungen benutzt werden. Der Rechnungsablauf für die Polynomberechnung erfolgt 
nach dem Horner-Schema gemäß GI. (4.3.3) innerhalb der Programmschleife von Zeile 042 bis 051. 
In Zeile 057 wird ein weiteres Unterprogramm Label E aufgerufen. In dieses Unterprogramm ist 
ggf. zwischen den Zeilen 088 und 090 die gegebene Funktion g(x) zu programmieren. Im vorlie- 
genden Programm wird dort lediglich der Wert O gesetzt. Nach dem Rücksprung ins rufende Pro- 
gramm nach Zeile 058 wird der errechnete Funktionsanteil g(x) zu dem Polynomwert p(x) hin- 
zuaddiert. In analoger Weise wird mit dem Aufruf des Unterprogramms Label c in Zeile 019 für 

die differenzierten Funktionswerte verfahren. Die differenzierte Polynomfunktion wird in dem 
Unterprogramm Label c gemäß der Gl. (4.3.4) berechnet. Dagegen muß die ggf. vorhandene diffe- 
renzierte Funktion g’(x) zwischen den Zeilen 091 und 093 programmtechnisch eingebaut werden. 
Für die einzubauenden Funktionen g(x) und g’(x) stehen als Sprung- oder Rücksprungadressen 
noch die Label 6 bis 9 und alle Speicher, die nicht durch Polynomkoeffizienten belegt sind, zur 
freien Verfügung. 

Nach Betätigung der Starttaste A sind in jedem Fall die ersten beiden Koeffizienten der Polynom- 
funktion a, und a, einzugeben. Dies gilt auch, wenn diese Koeffizienten identisch Null sein sollen. 
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Daher dürfen die Primärspeicher STO O und STO 1 für die Funktionen g(x) bzw. g’(x) nicht ver- 
wendet werden. 

Die Iterationsschleife wird zwischen der Adresse Label 5 in Zeile 016 und der Rücksprunganweisung 
GTO 5 in Zeile 033 durchlaufen. Sobald der Betrag des neu errechneten Korrekturwertes y„/yn 
kleiner als 10°° ist, wird die Schleife verlassen und der in STO E abgespeicherte Wurzelwert aus- 
gegeben. Zur Abkürzung der Rechenzeit kann ggf. in der kurzen Pause zur Anzeige des Korrektur- 
wertes der Wert O über die Tastatur eingegeben werden. 

Das Ergebnis des nach Gl. (4.3.5) berechneten Funktionswertes f(x) wird in Speicher C abgelegt. 


Automatische Ausgabe aller belegten Speicher 


Über die Startadresse Label D in Zeile 094 kann ein Programm zur Abfrage aller Speicherinhalte 
für die Polynomkoeffizienten aufgerufen werden. Dieses Hilfsprogramm ist so konzipiert, daß nur 
die Speicherinhalte zur Anzeige gebracht werden, deren Inhalt ungleich null ist. Es umfaßt 22 Pro- 
grammzeilen und reicht bis zur Zeilennummer 116. Damit stehen für die beiden Unterprogramme 
der Funktionen g(x) und g’(x) noch 98 freie Programmzeilen zur Verfügung. 


4.3.2 Testbeispiel „‚Polynomberechnung” 


Mit dem Programmaufruf Label C können Polynome bis 20ten Grades berechnet werden. Die Ein- 
gabe der Polynomkoeffizienten wird zweckmäßig durch Aufruf des Eingabeprogramms Label A 
getätigt. 

Zu berechnen sei der Funktionswert folgenden Polynoms 8ten Grades: 


p(x) = 2x8 - 3x? + 4x® - 3x* - 15x? + 10 


Start: 


Anzeige O Eingabe 10 R/S Anzeige 5 Eingabe O0 R/S 
Anzeige 1 Eingabe O0 R/S Anzeige6 Eingabe 4 R/S 
Anzeige 2 Eingabe - 15 R/S Anzeige 7 Eingabe - 3 R/S 
Anzeige 3 Eingabe O0 R/S Anzeige8 Eingabe 2 R/S 
Anzeige 4 Eingabe - 3 R/S Anzeige 9 


Nach Abschluß der Koeffizienteneingabe ist der Grad des Polynoms in STO D abgespeichert. 
Eingabe des Argumentes: x =2 

Start: |C |: Ergebnis p(x) = 286,00 

Rechenzeit rund 6 Sekunden 

Zur Kontrolle der Eingabewerte Start: [po]: 


kurze Pause: O lange Pause bzw. Ausdruck: 10,00 
kurze Pause: 2 lange Pause bzw. Ausdruck : — 15,00 
kurze Pause: 4 lange Puase bzw. Ausdruck: — 3,00 
kurze Pause: 6 lange Pause bzw. Ausdruck: 4,00 
kurze Pause: 7 lange Pause bzw. Ausdruck: — 3,00 
kurze Pause: 8 lange Pause bzw. Ausdruck: 2,00 
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4.3.3 Testbeispiele ‚„Nullstellensuche‘‘ 


1: 
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Zu der Funktion vierten Grades: 
f(x) = x® + 2x° - 13x? — 14x + 24. 


sollen die Wurzeln gesucht werden. 
Die Dateneingabe wird durch Start aufgerufen: 


AnzeigeO Eingabe 24 R/S 
Anzeige 1 Eingabe- 14 R/S 
Anzeige 2 Eingabe - 13 R/S 
Anzeige3 Eingabe 2 R/S 
Anzeige 4 Eingabe 1 R/S 


Eingabe eines Startwertes für die Wurzelsuche: x9 = O 


Start: 


Ergebnisse: 


. kurze Pause: 1,71 
. kurze Pause: 0,94 
. kurze Pause: 0,29 
. kurze Pause: 0,01 
. kurze Pause: 1,163999910 - 10°® 


Stop mit Anzeige bzw. Ausdruck x; = 1,00 
Rechenzeit rund 50 Sekunden 


PN — 


Neuer Startwert x= 4 


Start [e]: Ergebnis x2 = 3,00 


Neuer Startwert x=-1 


Start [e]: Ergebnis x3 = — 2,00 


Neuer Startwert x=-5 


Start [e]: Ergebnis x, = - 4,00 


Falls der Startwert eine Error-Anzeige ergibt, hat die Funktion an der betreffenden Stelle 
eine waagerechte Tangente, d.h. f’(x) = O0. In diesem Fall muß das Programm mit einem ver- 
änderten Startwert erneut gestartet werden. 

Beim vorliegenden Beispiel ist dies für den Startwert xo = — 0,5 der Fall. Der Programmablauf 
wird dann in Zeile 023 wegen der dort vorliegenden Division durch Null mit ERROR-Anzeige 
gestoppt. 

Der Verlauf einer Iteration ist im Bild 4.3.1 für den Startwert xo = O verdeutlicht. 


Bild 4.3.1 
Wurzelverbesserung nach Newton 


In der Reaktortheorie tritt bei der Berechnung eines optimalen Moderator-Brennstoffverhält- 
nisses x = Ny/N, im Zusammenhang mit der Vierfaktorenformel für die Kritikalität folgende 
Gleichung auf [16]: 


1890 + x - 0,175x' 985 = 0 

Die Wurzel dieser Gleichung findet man durch Aufspaltung in einen Polynomanteil p (x): 
p(x) =x + 1890 

und in einen exponentionellen Funktionsanteil g(x): 

g(x) = - 0,175x':°8° 

Für die Ableitung der Funktion g(x) ist zu setzen: 

g’ (x) = - 0,175 - 1,585 29'988 


Die beiden Funktionsunterprogramme Label E für g(x) und Label e für g’(x) können wie 
folgt programmiert werden: 


LABELE LABEL e 
RCL2 RCL2 
y“ 1 
RCL3 == 
x y“ 
RTN RCL2 
x 
RCL3 
x 
RTN 
Vor dem Programmstart mit Label B sind folgende Werte abzuspeichern: 
1 STOD Grad des Polynoms 
1890 stoo 2 
1 sTo1 Koeffizienten des Polynoms 
1,585 sto2 ; 
- 0,175 STO 3 Konstanten der Funktion g(x) 


Startwert: Xo = 100 
Start: Ergebnis x = 395,16 
Rechenzeit: rund 40 Sekunden 


Bei der Untersuchung der Wärmestrahlung tritt die Gleichung e * =1- x auf [17]. Die Funk- 
tion f(x) =1- Ex —e”* enthält einen Polynomanteil p(x) = 1- 3x und einen transzendenten 
Funktionsanteil g(x) =-e”*. Die Funktion g(x) und ihre Ableitung g’(x) = e”* müssen im 
Anschluß an die Unterprogrammadressen Label E und Label e programmiert werden: 


Label E Label e 
CHS CHS 

e* e* 

CHS RTN 
RTN 
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Vor dem Programmstart mit Label B sind folgende Werte abzuspeichern: 


1 STOD Grad des Polynoms 
1 sSTOoo 


-15 STO1 Koeffizienten des Polynoms 


Mit dem Startwert x = 2 ist die Iteration nach rund 20 Sekunden beendet. 
Anzeige des Lösungswertes x, = 4,96511. 
Der Startwert xo = 1 führt zu dem zweiten Lösungswert X2 = O (in der Anzeige erscheint 
der Wert 4,162253 10° '9). 

4. Für das unter Abschnitt 4.3.3 angegebene Polynom 8ten Grades ergibt sich mit dem Start- 
wert 1 nach rund 70 Sekunden Rechenzeit ein Wurzelwert zu x; = 0,80 und mit dem Start- 
wert 2 nach rund 110 Sekunden Rechenzeit ein weiterer Wurzelwert zu x, = 1,44. 


4.4 Numerische Integration 


b 
In Fällen, in denen das Integral einer Funktion | = f f(x) dx nicht geschlossen berechnet werden 
a 


kann oder der Integrand als empirische Funktion vorgegeben ist, bedient man sich der numerischen 
Integration. Diese gestattet durch stückweise Integration angepaßter Hilfsfunktionen eine angenäherte 
Lösung des Integrals zu finden [15]. Die einfachste Annäherung erhält man durch die Anwendung 

der Trapezregel, nach der jeweils zwei benachbarte Stützpunkte durch Geradenstücke verbunden 
werden. Verwendet man für die angepaßte Hilfsfunktionen Parabelstücke, so gelangt man zur 
Simpson-Regel mit minimal drei Stützpunkten. Polynome dritten Grades führen zur Newton-Regel 
und erfordern minimal vier Stützpunkte. Die numerische Integration ermöglicht durch die Verfüg- 
barkeit leistungsfähiger programmierbarer Taschen- und Tischrechner Problemlösungen am Schreib- 
tisch, die bisher den Zugriff zu einer EDV-Anlage erforderten. 


4.4.1 Trapezregel 
Läßt sich die Funktion f(x) im Intervall [a, b] durch eine Gerade mit den Stützwerten f(a) und 
b 
f(b) annähern, so gilt als angenäherter Wert des Integrals | = f f(x) dx nach der Trapezregel mit 
h=b-a: ® 
h 
az [f(a) + f(b)] (4.4.1) 


Unterteilt man das Integrationsintervall in mehrere äquidistante Streifen der Breite h, so stehen 
n=2+k Stützwerte zur Verfügung (k = 0,1, 2, ... ). Die Trapezregel liefert dann angenäherten 


b 
Wert des Integrals I= f ydx: 
a 


12 n Vor dit+ Wat ty) (4.4.2) 

mit 

ei (4.4.3) 
n-1 

n=2+k :(k=0,1,2,...) (4.4.4) 
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4.4.2 Simpson-Regel 


Teilt man das Integrationsintervall [a, b] in zwei gleiche Abschnitte der Breite h, so gilt als ange- 


b 
näherter Wert des Integrals I = f f(x) dx nach der Simpson-Regel: 
a 


1= 2 [fla) +4- la + h) + flb)] (4.4.5) 
Fügt man mehrere dieser Doppelstreifen innerhalb des Intervalls [a, b] aneinander, so stehen 
n=3 + 2k Stützwerte zur Verfügung (k = 0,1, 2, ... ). Die Simpson-Regel liefert dann als ange- 

b 


näherten Wert des Integrals I=f ydx: 
a 


1-2 (yo +Ayı +22 + 4ya ++ 4Yn-2 + Yn-ı) (4.4.6) 

mit: 

ne (4.4.7) 
nl 

n=3+2Kk IK=0, 1,2) (4.4.8) 


Bei der Simpson-Regel muß die Anzahl der Stützwerte größer oder gleich drei und ungerade sein. 


4.4.3 Newton-Regel 


Teilt man das Integrationsintervall [a, b] in drei gleiche Abschnitte der Breite h, so gilt als ange- 


b 
näherter Wert des Integrals I = f f(x) dx nach der Netwon-Regel: 
a 


IS hffla) +3: fla+h) +3-fla+2h) + Flb)] (4.4.9) 
Fügt man mehrere dieser Streifentrippel innerhalb des Intervalls [a, b] aneinander, so stehen 
n=4+3k Stützwerte zur Verfügung (k = 0,1, 2, ... ). Die Netwon-Regel, auch Drei-Achtel-Regel 


b 
genannt, liefert dann als angenäherten Wert des Integrals I = f ydx: 
a 


3 
1# 8 h(yo + 3y1 + 3y2 + 2y3 + 3ya + 3Y5 + 2y6 +... + 3yn-2 + Yn-1) (4.4.10) 
mit 
.bra 
h=,— (4.4.11) 
n=4+3k (k=0,1,2,...) (4.4.12) 


Durch die Kombination der Simpson-Regel mit der Newton-Regel können alle Integrationsinter- 
valle mit beliebiger Stützstellenzahl größer 5 bearbeitet werden. Für n = 6 wendet man z.B. für 

die ersten drei Stützstellen yo, Yı, y2 die Simpson-Regel an und für die vier letzten Stützstellen 
Ya, Ya, Ya, Ys die Newton-Regel und addiert die beiden Teilergebnisse zum gesamten Lösungswert. 
Es ist zu beachten, daß bei der Aufteilung in zwei Bereiche der Grenzstützwert beiden Bereichen 
angehört. 


29 


Tabelle 4.4.1 Anweisungsliste „Numerische Integration‘ 


Trapez-Regel GE! xLELA 662 &LBL5 
682 65Bc 663 SF& 
883 8 664  STOI 
584 GSBE 865 &#LBLb 
B65 5701 866 2 
866 RELI 667 FZ? 
687  X=8? 868 6701 
B88 E6TLI 665 3 
689 »LEL? era FB? 
dis 2 #1 6702 
Bil G65Bd e72 _SF& 
612 DSZI 873 SFZ 
ei3 6T07 874 6701 
Bid »LBLi 675 #LBL2 
615 65Ba 876  CF6 
dis STH 877 sLBLi 
817 _ RCLD 878 65Bd 
618 2 675 DSZI 
618 ® 888 ETOb 
626 RLCLI 851 655a 
621 x 882  ST+i 
B22__ST0e 683 RCLD 

Simpson-R. 823 »LBLB 054 3 
824 6559 685 x 
625 = 885 8 
BE  x#6? 657 = 
627 Tk=>Error 868 RELI 
625 6SBe 889 x 
8298 #LBL3 638 Fi? 
836 6 831  6T06 
831 6SBE 8932 _6Tüe 
632  STO1 
633 #LBL 0894 65B6 
834 2 695  x=r? 
835 F2? 895 ETOC 
636 6101 697 6559 
837 4 8956  &=Y? 
835 SF2 639 6TOB 
639 sLELi 188 6SBc 
648 65Bd 161 RCLI 
641 DSZI 162 3 
842 6T08 183  ST-6 
043 65Ba 184 = 
844  5T03 1065 ST0I 
645 ST+ 186  RCLA 
646  RCLD 167° Sri 
847 3 168 6103 
846 > 189 #LBL4 
849 RELI 118  cCF2 
858 x 111  5T04 
e1 Fi? 112 2 
852  6T04 113  S$T0I 
653 __6TOe 114 3 

Newton-R. 854 &#LBLC 115  STO8 
055 6558 116 SF 
856 = 117 R£EL3 
657 X#8? 118 6705 
858 s=DError 119 #LBL6 
653 65Be 128 ST+4 
868 8 121 RCi4 
B6i G6SBE 122 6T0e 
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UP 


UP 


UP 


Ergebnis 


UP 
Prüfe 
Newton 


UP 
Prüfe 
Simpson 


UP 


123 
124 
125 
126 
127 
128 
129 
138 
131 
132 
133 
134 
135 
136 
137 
138 
133 
146 
141 

142 
143 
144 
145 
146 
147 
148 
149 
158 
151 

152 
153 
154 
155 
156 
157 
158 
159 
168 
161 

162 
163 
164 
165 
156 
167 
168 
163 
178 
171 

172 
173 
174 
175 
176 
177 
178 
175 
188 
181 
182 
183 
154 


#LBLc 
CF2 
cr 

DSP8 
RCLB 
RCLA 
$T02 


RELC 
1 


sT08 


STOD 
RCLB 
1 


5T0l 
RCLA 
RTN 
#LBLd 
$T03 
65Ba 
RCL3 
x 

ST+1 
RTN 
#LBLa 
RCLD 
ST+2 
RCLZ2 
RCL& 
RCLI 


GSBE 
RIN 

*LBLe 

D5p2  b 
PRTA=D ['ydx 
RS a 

#LBL8 

RELC 


INT 
LSTX 
RTN 
#LBLE 
R/S<Fflx) 
RTN 
R-S 


4.4.4 Ablauf der programmierten numerischen Integration 


Zur Durchführung einer numerischen Integration nach den vorgenannten Regeln muß das Integra- 
tionsintervall [a, b], die Anzahl der Stützstellen und die Funktionswerte an den Stützstellen be- 
kannt sein. Die untere Integrationsgrenze wird in STO A und die obere Integrationsgrenze wird 

in STO B abgespeichert. Die gewählte Anzahl Stützstellen wird in STO C abgespeichert. Die Anwei- 
sungsliste des Programms ist in Tabelle 4.4.1 angegeben. 

Durch Betätigung der Taste A wird die Berechnung des Integrals nach der Trapezregel, durch die 
Taste B nach der Simpson-Regel und durch die Taste C nach der Newton-Regel gestartet. Bei Pro- 
grammstart über die Taste D wird zunächst geprüft, ob aufgrund der vorgegebenen Anzahl Stütz- 
werte eine ausschließliche Berechnung nach der Newton-Regel möglich ist. Falls dies nicht der 

Fall ist, wird geprüft, ob die Anzahl der Stützwerte ungerade ist, so daß die Berechnung nach der 
Simpson-Regel durchgeführt werden kann. Falls auch dies nicht der Fall ist, wird die Anzahl Stütz- 
werte um drei verringert (n’ = n- 3) und der Wert des Integrals für die n’ Stützwerte nach der 
Simpson-Regel berechnet. Hieran wird dann für die letzten vier Stützwerte die Newton-Regel an- 
geschlossen. 

Nach der Betätigung einer Starttaste [A], [e], oder [D] wird die Programmbearbeitung zur 
Eingabe des jeweiligen Stützwertes mit Anzeige des laufenden Indizes (0, 1,2, ...,n - 1) gestoppt. 
Nach Eingabe des betreffenden Stützwertes und anschließender Betätigung der R/S-Taste wird die 
Programmbearbeitung fortgesetzt. Nachdem der letzte Stützwert abgefragt wurde, wird der in 
STO 1 laufend aufaddierte Wert des Integrals zur Anzeige gebracht. Falls bei Aufruf der Simpson- 
Regel über Starttaste B die Anzahl der Stützstellen nicht ungerade ist, oder bei Aufruf der Newton- 
Regel über Starttaste C die Anzahl der Stützstellen nicht der Bedingung n = 4 + 3k genügt, wird 
die Anzeige ERROR erzeugt. In diesen Fällen kann der gesuchte Wert des Integrals mit n>5 in 
jedem Fall über den Programmstart mit Starttaste D, d.h. mit Hilfe der kombinierten Simpson- 
Newton-Regel gefunden werden. 


4.4.5 Numerische Integration einer analytischen Funktion 


In vielen Fällen ist der Integrand eine analytische Funktion, die nicht geschlossen gelöst werden 
kann oder zu der keine geschlossene Lösung greifbar ist. In diesen Fällen ist es zweckmäßig, die 
Stützwerte in Abhängigkeit von der Abszissenkoordinate in einem Unterprogramm zu berechnen. 
Ein hierzu geeignetes Unterprogramm muß dann dem vorgegebenen Integrationsprogramm ange- 
fügt werden. 

Hierzu ist ein Unterprogramm mit der Einsprungadresse Label E ab Zeile 181 schon programm- 
technisch vorgesehen. Dieses Unterprogramm besteht in dem vorgegebenen Programm lediglich 
aus den drei Programmzeilen Label E, R/S und Return. 

Die zur Berechnung des jeweiligen Stützwertes aus der vorgegebenen analytischen Funktion erfor- 
derlichen Programmanweisungen sind zwischen den beiden Programmzeilen Label E und RTN ein- 
zuschieben. Die Anweisung für den Programmstop ist dann nicht mehr erforderlich und kann ge- 
löscht werden. Dabei ist zu beachten, daß beim Einsprung der Index des jeweiligen Stützwertes 
im X-Register und das Argument x für die Funktion f(x) im Y-Register übergeben wird. Der 
aktuelle Abszissenwert ist außerdem in STO 2 abgespeichert. Er errechnet sich durch Multiplika- 
tion des Wertes im X-Register mit der Streifenbreite h, die in STO D abgespeichert ist, zuzüglich 
der unteren Integrationsgrenze. 
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2 


x 
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Soll z.B. das Integral I=fe dx über n Stützstellen berechnet werden, so sind hinter Label E 
folgende Anweisungen einzufügen: 


Stackregister 


4.4.6 Programmbeschreibung „Numerische Integration“ 


Das Programm besteht aus vier eigenständigen programmtechnisch ineinandergeschachtelten Pro- 
grammen mit den Startadressen A für die Anwendung der Trapezregel, B für die Simpson-Regel, 

C für die Newton-Regel und D für die kombinierte Simpson- und Newton-Regel. Hinzu kommen 

6 Unterprogramme. 

Die zu integrierende Funktion f(x) ist in dem Unterprogramm Label E ab Zeile 181 programm- 
technisch zu formulieren. Beim Aufruf dieses Unterprogramms werden im X-Register die Nummer 
des Stützwertes von O bis n und im Y-Register die zugehörige Koordinate x mit a<x<b über- 
geben. Bei der Programmierung der Funktion f(x) im Anschluß an STO E ist darauf zu achten, daß 
die Adressen Label O, Label 3, Label 5, Label 7 und Label b nicht verwandt werden, da diese im 
Hauptprogramm bereits als Rücksprungadressen vorkommen. Da der Rechner bei direkt adressier- 
ten Rücksprunganweisungen das entsprechende Label in Vorwärtsrichtung sucht, wäre bei mehr- 
facher Verwendung dieser Label kein ordnungsgemäßer Ablauf möglich. Falls z.B. bei analytischen 
Funktionen f(x) das Argument x benötigt wird, so ist unmittelbar hinter Label E die Anweisung 
xy für einen Austausch der X- und Y-Register vorzusehen. 

Die Programmstelle Label E kann im RUN-Modus über die Tastatur durch Betätigung der Tasten 
GTO E angesteuert werden. Die nach Betätigung der Taste SST im Programm-Modus erscheinende 
R/S-Anweisung ist dann durch Betätigung der Taste DEL zu tilgen. Für den Einschub zusätzlicher 
Anweisungen zur Berechnung des Funktionswertes stehen die Programmzeilen 182 bis 223 zur 
freien Verfügung. Falls das Argument x oder der Funktionswert f(x) ausgegeben werden sollen, 

so können PAUSE- oder PRINT-Anweisungen eingebaut werden. 


Trapezregel: Start 


Der Programmstart bei Label A führt zu der Programmzeile 001 an den physikalischen Anfang des 
Programms. Mit der folgenden Anweisung GSB c wird das Unterprogramm Label c in den Zeilen 
123 bis 142 zur Berechnung und Abspeicherung der Streifenbreite aufgerufen. Innerhalb der Pro- 
grammschleife zwischen den Zeilen 009 und 013 wird die Summe der Ordinaten an den Stütz- 
stellen nach GI. (4.4.2) gebildet. Hierzu werden die drei Unterprogrammebenen Label d, Label a 
und Label E hintereinander aufgerufen. In Zeile 022 erfolgt ein Programmsprung zu dem Ausgabe- 
Programmteil Label e. Das errechnete Integral wird dort mit zwei Dezimalstellen ausgegeben. 
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Simpson-Regel: Start 


Der Programmteil für die Integrationsberechnung nach der Simpson-Regel umfaßt die Programm- 
zeilen 023 bis 053 in Verbindung mit den aufgerufenen Unterprogrammen. Mit dem Unterpro- 
gramm Label 9 und der Abfrage in Zeile 026 wird geprüft, ob die Anzanl der Stützstellen ungerade 
ist. Falls dies nicht der Fall ist, wird eine Error-Anzeige erzeugt. In der Programmschleife zwischen 
den Zeilen 033 und 042 wird die Summe der Ordinaten an den Stützstellen nach Gl. (4.4.6) gebildet. 
In Zeile 053 wird wieder zu dem Ausgabe-Programmteil gesprungen. 


Newton-Regel: Start 


Der Programmteil für die Newton-Regel umfaßt die Programmzeilen 054 bis 092. Auch hier wird 
zunächst geprüft, ob die Bedingung für die Anzahl der Stützstellen nach Gl. (4.4.12) erfüllt ist. Die 
Summation nach Gl. (4.4.10) wird in der Schleife zwischen den Zeilen 065 und 080 vorgenommen. 
Das Programm endet in Zeile 092 mit der unbedingten Sprunganweisung für die Ausgabe. 


Simpson/Newton-Regel: Start [o] 


Um von der Anzahl Stützstellen unabhängig zu sein, ist es zweckmäßig, die kombinierte Anwen- 
dung der beiden Integrationsverfahren nach Simpson und Newton programmtechnisch zu vereinen. 
Es wird zunächst geprüft, ob mit der vorgegebenen Anzahl Stützstellen die Newton-Regel alleine 
anwendbar ist. Falls dies nicht der Fall ist, wird die Verträglichkeit der Anzahl Stützstellen für die 
Simpson-Regel geprüft. Ist auch die Simpson-Regel alleine nicht anwendbar, so wird die Anzahl 
Streifenintervalle um 3 verringert und die ersten n - 3 Stützstellen mit Hilfe der Simpson-Regel 
integriert. Für die restlichen 4 Stützstellen wird dann die Newton-Regel angewandt. In Zeile 122 
ist die Sprunganweisung GTO e für die Ergebnisausgabe erreicht. 


4.4.7 Bestimmung der Stromabgabe aus der Leistungs-Ganglinie 


In der elektrischen Energieversorgung ergibt sich häufig die Notwendigkeit, aus den gemessenen 
Ganglinien der Leistung an eine Übergabestelle im Netz die abgegebene Arbeit zu bestimmen. Hier- 
zu liegen vielfach 25 Meßwerte (von O bis 24 Uhr) für die Leistung vor. 

In Bild 4.4.1 ist die Ganglinie der Leistung für ein abgegrenztes Gebiet der öffentlichen Energiever- 
sorgung angegeben. 


0 — 
MW 


N 700 


| 500 


300 


Bild 4.4.1 
Beispiel einer Leistungs-Ganglinie 
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Vor dem Start des Programms für die kombinierte Simpson-Newton-Integration durch Betätigung 
der Taste D sind folgende Eingaben erforderlich: 


0STOA 
24 STOB 
25 STOC 
Start: [o] 
Anzeige Eingabe * Anzeige Eingabe 
0 P(0) = 450 MW 13 P(13) = 760 MW 
1 P(1) = 400 MW 14 P(14) = 720 MW 
2 P(2) = 410 MW 15 P(15) = 710 MW 
3 P(3) = 410 MW 16 P(16) = 710 MW 
4 P(4) = 440 MW 17 P(17) = 670 MW 
5 P(5) = 470 MW 18 P(18) = 670 MW 
6 P(6) = 510 MW 19 P(19) = 685 MW 
7 P(7) = 660 MW 20 P(20) = 695 MW 
8 P(8) = 755 MW 21 P(21) = 700 MW 
9 P(9) = 760 MW 22 P(22) = 660 MW 
10 P(10) = 810 MW 23 P(23) = 625 MW 
11 P(11) = 790 MW 24 P(24) = 535 MW 
12 P(12) = 830 MW 
24h 


Unmittelbar im Anschluß an die letzte Eingabe wird die abgegebene Arbeit A = / P(t) dt mit 
15 354,38 MWh als Ergebnis der numerischen Integration angezeigt. 


4.4.8 Integration der Gaußschen Normalverteilung 


Eine in der Statistik grundlegende kontinuierliche Verteilung ist die Gaußsche Normalverteilung 
mit der normierten Verteilungsdichte: 


x2 


tue —e ? (4.4.13) 
Y2r 

GI. (4.4.13) beschreibt eine zu x = 0 symmetrisch gelegene Verteilung, deren Integral über alle 
x-Werte von x=-% bis x = + den Wert eins ergibt. Das Maximum der normierten Normalver- 
teilung erreicht bei x = O den Wert f = 0,3989. Will man z.B. zu einer normal verteilten Grundge- 
samtheit feststellen, mit welcher Wahrscheinlichkeit ein bestimmtes Ereignisspektrum aus der 
Menge aller x-Ereignisse statistisch auftreten wird, so ist die Verteilungsdichte über den betrach- 
teten Ereignisbereich zu integrieren. Man spricht hierbei von der statistischen Sicherheit S(x): 


+x 


S(x) = [two dt (4.4.14) 


In Bild 4.4.2 ist die Fläche der statistischen Sicherheit für das Integrationsintervall -2Sx<s+2 
unterhalb der Glockenkurve dargestellt. 
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Das Integral zur Bestimmung der statistischen Sicherheit ist nicht geschlossen lösbar. Daher ist es 
zweckmäßig, eine Näherungslösung mit Hilfe der programmierten numerischen Integration zu be- 
stimmen. 

Vor dem Start des Programms durch Betätigung der Taste D müssen die Anweisungen zur Berech- 
nung des Integranden y(x) nach Gl. (4.4.13) ab Programmzeile 182 eingeschrieben werden. Hierzu 
wählt man nach dem Einlesen des Programms durch die Anweisung GTO E die Anfangsadresse des 
Unterprogramms Label E in Zeile 181 an. Nach Umschaltung vom RUN-Modus in den PRGM- 
Modus wird der Tastencode für Label E angezeigt. Da das Argument im Y-Register übergeben wird, 
beginnt das einzuschiebende Programm mit der x Z y Anweisung (oder einer RCL 2 Anweisung): 


181 *LBLE 

1832 x2 y x-Wert aus Y-Register fix) 

183 x 

184 2 | ” 

185 er 

186 CHS Be. 

187 e* yx)=e ? 

188 2 

189 Pi 

190 5 3 =2 =] 0 1 2 3 
191 X Van a 

192 + Bild 4.4.2 Normierte Verteilungsdichte der Normalverteilung 
193 RTN 


Die untere Integrationsgrenze wird in STO A und die obere in STO B abgespeichert (-2STO A, 
2STO B). Die Anzahl der Stützwerte ist in Abhängigkeit von der angestrebten Genauigkeit zu 
wählen und in STO C abzuspeichern (z.B. 15 STOC). 

Nach dem Programmstart D wird der Wert des Integrals zu 0,95 nach rund 50 Sekunden Rechen- 
zeit angezeigt. Durch Multiplikation dieses Wertes mit 100 erhält man den Wert für die statistische 
Sicherheit S(+2) = 95,45 %. 

Die Rechenzeit t& ist etwa proportional der Anzahl Stützstellen mit ta = n3s. Dagegen nimmt 
die Anzahl der signifikanten Ziffern im Ergebnis nur etwa mit dem Logarithmus der Stützstellen- 
zahl zu: 


n= 10: S(+2)=94% beita= 355 
n= 50: S(+2)=95,4499 % beita = 1805 
n= 100: S(+2)=95,449973% beitßa = 330s 
n=1000: S(+2) = 95,44997348 % bei tp = 3240 s 


Spezielle Programme zur statistischen Sicherheit werden in Abschnitt 6.1 angegeben. 


4.4.9 Berechnung der Fourier-Koeffizienten 


In der Technik besteht vielfach das Problem, von einer empirisch vorgegebenen periodischen Funk- 
tion, z.B. als Bild von einem Oszilloskop oder als geschriebener Linienzug von einem Oszillographen, 
den Grundschwingungsanteil und die Oberschwingungsanteile oder auch den Gleichstromanteil zu 
bestimmen. Auch hierzu ist die programmierte numerische Integration als wertvolles Hilfsmittel 
anwendbar. 
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Für die Fourier-Koeffizienten einer periodischen Funktion f(x) gilt [15]: 


+7 
a. = 1 [re coskx dx (4.4.15) 
a: 5 
+7 
bu = | to) sin kxdx (4.4.16) 


-=M 
Hierzu kommt ein konstantes Glied: 
+ 
1 
vo” Zu [ Ania (4.4.17) 
TE 


Im Falle einer symmetrischen Funktion f(x) braucht nur jeweils eine Koeffizientengruppe über 
das halbe Integrationsintervall berechnet zu werden: 

Für eine gerade Funktion, d.h. f(x) = f(-x) (z.B. cosx), verschwinden alle Koeffizienten b.. Für 
den verbleibenden symmetrischen Anteil gilt: 


m 
ax -2 [rin eoskxax (4.4.18) 


0 


Für eine ungerade Funktion, d.h. f(x) =-f(-x) (z.B. sinx) verschwinden alle Koeffizienten ax. 
Für den verbleibenden unsymmetrischen Anteil gilt: 


m 
b& = 2 [ro sinkx dx (4.4.19) 
[) 


1. Empirische Funktionen 


Für die in Bild 4.4.3 angegebene ungerade Funktion sollen mit Hilfe der programmierten nume- 
rischen Integration die ersten 6 Fourier-Koeffizienten bestimmt werden. 


Bild 4.4.3 


Harmonische Analyse einer empirisch 
vorgegebenen periodischen Funktion 


1a BE 
ZUR 
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Nach der Unterteilung des Integrationsintervalls von O bis z in 10 äquidistante Abschnitte werden 
folgende 11 Stützwerte abgelesen: 


f0) =0 

f(1) = 0,8 
f(2) = 1,4 
f3) = 14 
fa =12 
f(5) = 09 
f(6) = 0,5 
ft) = 04 
f(8) = 04 
f(9) = 03 
f(10) = 0 


Da der Integrand sowohl aus einem empirischen Anteil f(x) als auch aus einem analytischen Anteil 
sin kx besteht, wird das Programm ab Programmzeile 182 mit der R/S-Anweisung zur Eingabe des 
betreffenden f(x) Wertes durch folgende Anweisungen zur Berechnung des analytischen Anteils 
sinkx und des konstanten Faktors 2/ erweitert: 


182  R/S Eingabe des f(x)-Wertes 

183 RCL2 x-WertvonSTO 2 

1834 R>D Umwandlung in Grad 

185  RCLE Ordnung k der Schwingung von STO E 


186 x kx 

187 sin sin kx 

188 x f(x) sin kx 
189 2 

190 x 2 f(x) sinkx 
191 rn 

192 + 2 f(x) sinkx 


193 RTN Rücksprung 
Vor dem Start des Programms durch Betätigung der Taste D sind folgende Eingaben zu tätigen: 


Eingabe der unteren Integrationsgrenze OSTOA 
Eingabe der oberen Integrationsgrenze aSTOB 
Eingabe der Anzahl Stützpunkte I1-STONC 
Eingabe der Ordnungszahl k 2.B.1STOE 


Nach jedem Programmstop sind die Stützwerte f(0) bis f(10) einzugeben und durch Betätigung 
der R/S-Taste zu quittieren. 

Die Bearbeitungszeit zur Berechnung eines Koeffizienten beträgt etwa 2 Minuten. 

Nach Beendigung der Rechnung erscheint der berechnete Koeffizient in der Anzeige: 


z.B. für k=1 bı = 1,08 
fürk-2 b5= 051 
für k=3_ b3= 024 
für k=-4  ba=-0,04 
für k-5  bs= 0,065 
für k=6  be=-0,02 
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Die gegebene Funktion f(x) kann somit näherungsweise durch die ersten drei Fourier-Koeffizien- 
ten beschrieben werden: 


f(x) = 1,08 sinx + 0,51 sin 2x + 0,24 sin 3x 


Da in dem Programm die Primärspeicher 5 bis 9 und alle Sekundärspeicher unbenutzt bleiben, ist 
es ggf. zweckmäßig, die Stützwerte in diesen Speichern abzuspeichern und durch entsprechende 
RCL-Anweisungen bei den Programmstops abzurufen. Mit Hilfe der indirekten Speicheradressie- 
rung können diese Abrufe für bis zu 14 Stützpunkten auch automatisch vorgenommen werden. 
Hierzu werden die ersten zehn Stützwerte in den Sekundärspeichern STO O bis STO 9 und die 
restlichen 4 in den Primärspeichern STO 6 bis STO 9 abgespeichert. An Stelle der R/S-Anweisung 
in Programmzeile 182 ist dann folgende Anweisungsfolge zusätzlich einzuschieben: 


182 RCLI 
183 STO5 
184 Rt 
185 STOI Der Stützwertindex wird in STO | gespeichert 
186 9 

187 XV 

188 xX<SY 

189 GTO1 Sprung, falls Index des Stützwertes <9 

190 4 

191 - 

192 STOI 
193 RCL (i) Ruf des Stützwertes aus dem Primärbereich 
194 GTO2 

195 *LBL1 


Der Wert des Indexregisters aus dem Hauptprogramm wird gespeichert 


Bildung der Speicheradressen für den Primärbereich STO 6 bis STO 9 


196mPZS 
107] RCL (i) Ruf des Stützwertes aus dem Sekundärbereich 


198hP ZS 

199 *LBL2 

S nn : Der ursprüngliche Wert des Indexregisters wird wieder gesetzt 
202 XV Rückholen des Stützwertes 


(203 Pause) ggf. Anzeige des Stützwertes 
: Fortsetzung mit der Anweisung in der vorherigen Zeile 183 mit RCL 2 


2. Analytische Funktionen 


Ist die zu analysierende Funktion analytisch erklärt, so kann die Gleichung der Funktion unmittel 
bar als Unterprogramm Label E in das numerische Integrationsprogramm eingefügt werden. Ist z.E 
als Funktion f(x) die bei 90° angeschnittene Sinusschwingung gegeben, so können die bei dieser 
alternierenden Funktion existierenden ungeraden Fourier-Koeffizienten aus Gl. (4.4.18) bestimmt 
werden. 


m 

0 < = 

0 x<z 
f(x)=1 05 für x=1 
2 

sinx S<x<e 
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Als Unterprogramm Label E sind folgende Anweisungen einzufügen: 


181 *LBLE 

182... xy Argument x im Bogenmaß ins X-Register holen 
183 Pi 

184 2 

185 EI 

186 X>Y? Abfrage, ob Intervall OSx = 
187 GTO1 

188 X=Y? Abfrage, ob x = 3 

189 GTO2 

10 xX2Y 

191 R>D fx) = sinx für 5<x<m 
192 SIN 

193 _GTO6 

n Sn fix) =0 für 0<x<z 

196 GTO6 

197 *LBL2 

198 | f(x) = 0,5 für x=5 

199 5 

200 "LBL6 

201 RCL2 

202 RCLE 

= R dr coskx (k ausSTO E) 

205 coS 

206 x 

207 2 

208 

209 Pi 2 

210 + Mit = f(x) coskx im X-Register 
211 RTN 


Rücksprung ins Hauptprogramm 


Vor dem Programmstart mit Label D sind folgende Eingaben erforderlich: 


0 STOA untere Integrationsgrenze 
a STOB obere Integrationsgrenze 
10 STOC Anzahl der Stützwerte 

1 STOE Ordnungszahl k = 1 


Start: |D ] a, = - 0,3184 (Der exakte Wert ist a} = - 0,31831) 
Rechenzeit rund 50 Sekunden 


Eingaben: 50STOC Anzahl der Stützwerte 
15 STO E Ordnungszahl k = 15 


Start: [D] a15 = 0,0469 (Der exakte Wert ist a1s = 0,04547) 
Rechenzeit rund 240 Sekunden 


Ein spezielles Programm zur harmonischen Analyse wird in Abschnitt 4.7 angegeben. 


4.5 Lösung von Differentialgleichungen nach dem Runge-Kutta-Verfahren 


Das Runge-Kutta-Verfahren hat sich in der Praxis als besonders zuverlässiges und einfach zu hand- 
habendes Verfahren zur numerischen Lösung von Differentialgleichungen bewährt [15]. Es beruht 
auf einer Verallgemeinerung der Simpson-Regel und arbeitet in dem gewählten Intervall h mit drei 
Stützstellen und vier Funktionswerten. Es ist hinsichtlich seiner Genauigkeit ebenso wie die Simpson- 
Regel ein Verfahren vierter Ordnung, d.h. die Verfahrensfehler sind von der Ordnung h°. 

Zur programmierten Berechnung ist ein von Kutta für Differentialgleichungen 1. Ordnung ange- 
gebener Formelsatz besonders geeignet. Zur Lösung von Differentialgleichungen 2. Ordnung wurde 
das Verfahren von Nystrom erweitert. Auch hierzu steht ein geeigneter Formelsatz für die nume- 
rische Berechnung zur Verfügung. 


4.5.1 Differentialgleichung erster Ordnung 


Gegeben sei die Differentialgleichung erster Ordnung: 
y=flx,y) (4.5.1) 


mit den Anfangsbedingungen x, und yo. Innerhalb des gewählten Intervalls h werden mit Hilfe 
der Steigung y’ = f(x;, y;) vier Zuwachswerte k; = Ay; = f'(x;, y;) h nach folgendem Rechenschema 
ermittelt. 

Ausgehend von den Anfangswerten für den ersten Rechenschritt: 


X = %o (4.5.2) 
Yı = Yo (4.5.3) 


berechnet man nach der Differentialgleichung die zugehörige Steigung y; und hieraus durch Multi- 
plikation mit der Schrittweite h den auf den ganzen Schritt h bezogenen y-Zuwachs, der mit kı 
bezeichnet sei: 


yı =f(x7,Yyı) =f} (4.5.4) 
kı = fı h (4.5.5) 


Mit dieser Steigung geht man geradlinig weiter, und zwar bis zur Schrittmitte, also bis zu den Werten 


X2 = Xot h (4.5.6) 
1 
Ya=Yo*, kı (4.5.7) 


Zu diesem vorläufigen Wertesatz errechnet man wiederum nach der Differentialgleichung die zuge- 
hörige Steigung ya und den zugehörigen, auf den ganzen Schritt h bezogenen y-Zuwachs k, nach: 


ya =f (X2, Y2) = fa (4.5.8) 
ka =fzh (4.5.9) 
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Hiermit geht man abermals vom Anfangspunkt aus und noch einmal nur bis zur Schrittmitte, also 
zu den Werten: 


u =xo+sh (4.5.10) 


1 
weltz ka (4.5.11) 


Wiederum berechnet man hierzu nach der Differentialgleichung die Steigung y3 und den Zuwachs 
kz nach: 


v3 = fixa, ya) = fa (4.5.12) 
k3 =fa3h (4.5.13) 


und geht damit ein drittes Mal vom Anfangspunkt aus, diesmal aber bis zum Schrittende, also zu 
den Werten: 


X4=Xo th (4.5.14) 

Ya=Votksa (4.5.15) 
zu denen ein viertes Mal die Steigung ya und der Zuwachs ky berechnet werden: 

va=flxa, va) = fa (4.5.16) 

ka=fah (4.5.17) 
Aus den so errechneten vier k-Werten k; wird nun ein Mittelwert k derart gebildet, daß der damit 
errechnete endgültige Näherungswert y} = yo + k an der Stelle x} =xo + h mit der wahren Lösung 


y(x) an dieser Stelle, bei Taylor-Entwicklung von xo aus, in möglichst vielen h-Potenzen überein- 
stimmt. Dieser Mittelwert lautet: 


K=2lkı + 2ka + 2ka +ky) (4.5.18) 


und mit ihm das endgültige Wertepaar: 
X1=Xo+h (4.5.19) 
Yı= Yo +k (4.5.20) 


das zugleich als Anfangswertepaar der nächsten gleichartigen Schrittrechnung dient. 


4.5.2 Schrittweitensteuerung 


Da die Verfahrensfehler beim Runge-Kutta-Verfahren von der Ordnung h® sind, nehmen die Fehler 
bei Schrittverkleinerung sehr rasch ab und bei Schrittvergrößerung entsprechend h® stark zu. Daher 
kommt der richtigen Schrittwahl besondere Bedeutung zu. Um andererseits nicht durch zu kleine 
Schrittwahl unnötig viel Rechenzeit zu verlieren, ist es zweckmäßig, eine automatische Schrittweiten- 
steuerung vorzunehmen. 

Für mittlere Genauigkeitsanforderungen muß etwa gelten: 


ka ka 


= 
0,05<|, =, 


<0,15 (4.5.21) 
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Liegt der Differenzenquotient innerhalb des abgeschlossenen Intervalls [0,05; 0,15], so wird das 
Rechenschema mit unveränderter Schrittweite fortgesetzt. 

Falls der Differenzenquotient die obere Schranke überschreitet, wird die Schrittweite halbiert und 
falls er die untere Schranke unterschreitet, wird sie verdoppelt. 


4.5.3 Programmbeschreibung „Differentialgleichungen erster Ordnung” 


Das Programm nach Tabelle 4.5.1 ist für den allgemeinen Anwendungsfall konzipiert und enthält 
daher nur das Rechenschema für die Bearbeitung einer Funktion der Form y’=f(x, y) nach dem 
Runge-Kutta-Verfahren. Die im speziellen Fall gegebene Funktion f(x, y) ist dann als Unterpro- 
gramm im Anschluß an die Einsprungadresse Label E in Programmzeile 111 einzubauen. Dafür 
stehen noch 112 Programmzeilen zur freien Verfügung. Aus dem Hauptprogramm werden in das 
Unterprogramm Label E im X-Register der aktuelle x-Wert und im Y-Register der aktuelle y-Wert 
übergeben. Der errechnete Wert für die Steigung y’ im Punkt (x, y) wird im X-Register an das ru- 
fende Programm zurückgegeben. In dem Unterprogramm Label E können die Primärspeicher STO 8, 
STO 9,STO D,STO E und alle Sekundärspeicher sowie die Label 3 bis 9, Bbis D und cbise frei 
verwendet werden. 

Vor dem Start mit Label A müssen die Anfangswerte xo inSTO A, yo inSTO B und die Schritt- 
weite h in STO C abgespeichert werden. Das Programm beginnt mit dem Setzen des x; , yı-Werte- 
paares gemäß GI. (4.5.2/3). In Zeile 006 ist mit dem Label b die Startadresse für die Berechnungs- 
zyklen mit der Schrittweite h eingebaut. Der Unterprogrammaufruf GSB E in Zeile 010 in Verbin- 
dung mit der anschließenden Multiplikation mit der Schrittweite h ergibt den ersten y-Zuwachs aus 
GI. (4.5.4/5). Dieser wird in STO 5 abgespeichert. Bis Zeile 023 sind die Gin. (4.5.6/7) ausgewertet. 


Mit dem Unterprogrammaufruf in Zeile 025 wird die GI. (4.5.8) ausgewertet. Der y-Zuwachswert 
ka wird in STO 6 abgespeichert. Anschließend wird mit Zeile 037 Gl. (4.5.12) ausgewertet und 
dieser y-Zuwachs nach STO 7 abgespeichert. Falls das Flag 1 gesetzt ist, wird die in Zeile 043 auf- 
gerufene automatische Schrittsteuerung übersprungen. In dem Unterprogramm Label a wird die 
Schrittweite nach Maßgabe der Ungleichung GI. (4.5.21) verändert. Der vierte Unterprogrammauf- 
ruf für Label E erfolgt in Zeile 059. Mit Hilfe der Registerarithmetik wird der y-Zuwachs k4 nach 
STO 0 aufaddiert. Nach Berechnung des neuen Wertepaares gemäß Gl. (4.5.19/20) werden der 
x-Wert in Zeile 070 und der y-Wert in Zeile 072 ausgegeben. Anschließend wird mit dem Rück- 
sprung nach Label b das folgende Intervall h bearbeitet. Im Unterprogramm Label a wird als Kenn- 
zeichen für eine veränderte Schrittweite h das Flag O gesetzt. Dieses Flag bewirkt im gesetzten Zu- 
stand in den Zeilen 044/45 einen Rücksprung an den logischen Anfang der Intervallbearbeitung. 
Das Programm hat kein logisches Ende, so daß die Berechnung der Wertepaare (x,y) solange fort- 
gesetzt wird, bis von der Tastatur aus ein Stop-Befehl durch die Betätigung der R/S-Taste erfolgt. 
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Tabelle 4.5.1 Anweisungsliste „‚Differentialgleichung erster Ordnung‘ 


Start Bei 
882 
863 
d64 
885 
dBE 
867 
a85 
663 
818 
6il 
612 
613 
814 
615 
dis 
ei7 
8id 
813 
826 
621 
622 
623 
824 
825 
626 
627 
825 
823 
858 
631 
832 
633 
834 
635 
835 
837 
838 
833 
846 
ö41 
842 
643 
844 
645 
846 
847 
645 
843 
858 
851 
852 
853 
854 
655 
856 
857 


*LBLA 
RELA 
5To1l 
RCLE 
5T02 

*LELb 
RCLZ 
RCL1 

CF& 
6SBE 
RCLC 

Ä 
5T05 
5T08 
2 


RCLZ 

+ 
RCLC 
2 


RCLI 
a 
5T03 
6SBE 
RCLE 
x 
ST0s 


£ 


A 
5T+8 
4 
RCLZ 

+ 
RÜL3 
6SBE 
RELC 

x 
Tor 
Fi? 
sToß 
655a 
F6? 
6TOb 
xLBLö 
RCL? 
2 

x 
$T+& 
RCL7 
RCL2 

+ 
RCLI 
RCLC 


+ 
ST03 


058 
859 
566 
ö6l 
862 
0863 
864 
865 
666 
867 
868 
869 
878 
671 
872 
873 
UP 874 
Schritt- 875 
weiten- 876 
steuerung 877 
878 
673 
886 
881 
882 
683 
064 
885 
886 
867 
685 
883 
638 
63i 
632 
693 
634 
895 
635 
637 
895 
639 
186 
161 
1862 
183 
164 
185 
186 
167 
188 
183 
118 
UP 111 
112 
113 


5T01 
6SBE 
RCLC 


x 
5T+8 
6 
5T+6 
RCLB 
ST+2 
RCLi 
SPC 
PSE 
PRTIÄ=D x 
RCL2 
PRTX=D y 
6TOb 
*LBLa 
RCL?7 
RiL6 
A=Y? 
6T02 


RÜL6 
RCLS 


ABS 


Agl? 
6T02 
2 
SFö 
#LBL2 
RÜLC 
Fa? 
A 
$STOc 
RTN 
#LBLE 
RTNSF fix,y) 
R/S 


An? 


4.5.4 Test- und Anwendungsbeispiele 


1. Es sei die Differentialgleichung y’ = 2! mit den Anfangsbedingungen Xo = Yo = 1 gegeben. 
Die Genauigkeit der Rechnung kann hier durch Vergleich mit der exakten Lösung y = x? 
verfolgt werden. 

Das Unterprogramm Label E besteht hierfür aus folgenden Anweisungen: 


LBEE (Im X-Register wird x, im Y-Register wird y übergeben) 


* Division x 

2 

x 22 

RTN Rücksprung mit 2: im X-Register 


Nach Eingabe der Anfangswerte 1 STO A, STO B und 0,1 STO C kann das Programm durch 
Betätigung der Taste A gestartet werden. 

Als Ergebnis wird in einer kurzen Pause die Schrittweite h angezeigt und anschließend die 
Wertepaare der Lösung {x,y} ausgegeben. Für einen Berechnungszyklus werden rund 7 Se- 
kunden benötigt. 

Im Verlaufe der Rechnung wird die Schrittweite unter Beibehaltung des Verfahrensfehlers 
von rund 0,5:10°° je Rechenschritt automatisch angepaßt: 


3,999979 
0,4 ab 15,999835 
0,8 ab 63,999012 
1,6 ab 255,994730 
3,2 ab 1 023,973648 1024 
4 095,873508 4 096 
16 383,40969 16 384 
65 533,30143 65 536 
262 131,8565 262 144 
1 048 522,029 1.048 576 


Nach 100 Rechenschritten beträgt der Fehler erst - 0,0052 %. 

2 Zu einem elektrischen Stromkreis nach Bild 4.5.1 ist der zeitliche Verlauf des Stromes i für 
den Fall zu bestimmen, daß die Klemmen 1,2 im Nulldurchgang der Spannung kurzgeschlos- 
sen werden (Bild 4.5.1). 


Bild 4.5.1 RL-Reihenschaltung mit Kurzschluß 
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Es gilt die Maschengleichung: 


b di - 

iR+ UL =u (4.5.22) 
di. , U, ie RR 
en sinwt-i x (4.5.23) 


R=0409 
X=320 

= ü 20 kV 

i= >= 2 ———— = 16,3 kA 
x v3:320 


Eingabedaten: 


0 STOA Anfangspunkt to = 0 
0 STOB Anfangsstrom i(0) =0 
30fD-R STOC Schrittweite h= 30° = 0,52 rad 
16,3 STOD Scheitelwert des Wechselstromes 
0,4 STO8 Widerstand R 
3,2 STO9 Reaktanz X 


Im Anschluß an Label E in Zeile 111 sind folgende Programmzeilen einzufügen: 


111° LBL.E Einsprungadresse 
112 TR=D Umwandlung von Radiant in Grad 


113 SIN Sinus (wt) 

114 RCLD Scheitelwert des Stromes 
115 x Multiplikation i sin wt 
116 x2y Registertausch 


117 RCL8 Widerstand R 
118 RCL9Y Reaktanz X 


119 = Division R 
120° x Multiplikation ix 
121 — Subtraktion R 
122 RTN Rücksprung mit: I isinwt-im 


dwt x 


Die Berechnung der (wt, i)-Wertepaare wird durch die Betätigung der Taste A gestartet. Nach 
jeweils 15 Sekunden Rechenzeit wird ein Wertepaar ausgegeben: 


tı = 0,52 wt in rad = 30° t4 = 2,09 wt in rad = 120° 
in = 2,14 Strom i (30°) inkA ia = 22,11 Strom i (120°) in kA 
= 1,05  wtinrad = 60° t5s= 262 wtinrad= 150° 
io = 7,79 Strom i (60°) in kA is = 26,47 Strom i (150°) in kA 
t3= 1,57  wtinrad = 90° ts= 3,14  wtinrad= 180° 
ig = 15,19 Strom i (90°) in kA ig = 26,89 Strom i (180°) in kA 
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Der Strom- und Spannungsverlauf als Lösung der Differentialgleichung ist in Bild 4.5.2 
angegeben: 


30 — T 30 
kA 


20 


"20, PA RS —-1 


T 2 It in Sr 


— ul 


Bild 4.5.2 Strom- und Spannungsverlauf bei Kurzschluß im Nulldurchgang der Spannung 


4.5.5 Differentialgleichungen zweiter Ordnung 


Das Runge-Kutta-Verfahren wurde von Nystrom auch auf Differentialgleichungen zweiter Ordnung 
ausgedehnt. Auch hier verfolgt man die Strategie des Vortastens vom Schrittanfang aus auf Parabel- 
bögen zweimal bis zur Schrittmitte und einmal bis zum Schrittende mit nachfolgender Mittelwert- 
bildung. Damit wird wieder ein Taylor-Abgleich bis zur vierten Ordnung einschließlich erreicht, d.h. 
der Verfahrensfehler ist von der Ordnung h®. Für Differentialgleichungen zweiter Ordnung der Form: 


y'=f(x,y,y) (4.5.24) 


läßt sich die Rechenvorschrift mit nachfolgendem Formelsatz ausdrücken. Als Ausgangswerte für 
den ersten Rechenschritt werden die Anfangsbedingungen eingesetzt: 


X =%o (4.5.25) 
Yı = Yo (4.5.26) 
yı = Yo (4.5.27) 


Hiermit wird aus der gegebenen Funktion f(x,y,y') die Änderung der Steigung im Ausgangspunkt 
und der Zuwachs des Funktionswertes y = f(x) bis zum Schrittende bestimmt: 


v1 = fix, Yı,yı) = f, (4.5.28) 


Der errechnete Funktionswert f(x, y, y) wird über die Schrittweite h als konstant angenommen. 
Nach zweimaliger Integration ergibt sich der jeweilige y-Zuwachs aus der Multiplikation des Funk- 
tionswertes mit h?/2 zu Ay = [ (ffdx) dx = fh?/2: 


h? 


kı =fı 2 


(4.5.29) 
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Mit diesen Werten werden die vorläufigen Argumente der Funktion bei der Schrittmitte ermittelt: 


%2=Xot 3 (4.5.30) 
LEN (4.5.31) 
Yar=Y0:T.Yo aa ‚2. 
' ’ kı 
Y2=Yot g7 (4.5.32) 


Hieraus folgt wieder für die Steigungsänderung und den Zuwachs: 


v2 = flx2, 2, Va) = fa (4.5.33) 
h? 
k2a=fa 2 (4.5.34) 


Im dritten Rechenschritt wird ein zweiter Wert für die Steigung der Funktion in Schrittmitte be- 
stimmt: 


Ka = X, (4.5.35) 

Ya = Ya (4.5.36) 
’ di: k 

va=yo+ nn (4.5.37) 


Damit ergibt sich ein drittes Wertepaar für die Steigungsänderung und den Zuwachs: 


y3 = f(x3, Ya, Ya) = fa (4.5.38) 
h? 
ka" fa 7 (4.5.39) 
Schließlich werden die Argumente der Funktion am Schrittende berechnet: 
X4=Xo +h (4.5.40) 
Ya = Yo +Yoht+ka (4.5.41) 
r Y ka 
Ya=Yo+27 (4.5.42) 


Als viertes Wertepaar für die Steigungsänderung und den Zuwachs gilt: 


ya = flxa, va, Va) =fa (4.5.43) 
h? 
ka=fa cy (4.5.44) 


Mit den berechneten vier vorläufigen Zuwachswerten k} bis k4 werden zwei Mittelwerte gebildet: 


(kı +k2 + ka) (4.5.45) 


2k' = 5 (kı + 2k2 + 2kz3 + ku) (4.5.46) 
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Für die beiden endgültigen Näherungswerte am Schrittende x; = xo + h gilt: 


Yı=Yo*yohtk (4.5.47) 
r ; k' 
Yı=Yo+2 En (4.5.48) 


Mit dem Wertetrippel x4, Yı, yı sind zugleich die Argumente für den nächsten Schritt gegeben. 


4.5.6 Programmbeschreibung „Differentialgleichung zweiter Ordnung” 


Das Programm nach Tabelle 4.5.2 umfaßt die Rechenvorschrift nach dem Runge-Kutta-Nystrom- 
Verfahren und die vorbereitete Parameterübergabe für den Aufruf eines Unterprogramms Label E, 
in dem die Funktion y” = f(x,y,y’) programmtechnisch zu formulieren ist. Beim Einsprung in das 
Funktionsunterprogramm Label E werden die Argumente x im X-Register, y im Y-Register und y 
im Z-Register als Stackregister-Inhalte übergeben. Beim Rücksprung wird im X-Register der errech- 
nete Funktionswert y’ an das Hauptprogramm übergeben. Für die Programmierung der Funktion 
f(x,y,y’) stehen die Programmzeilen 156 bis 223 zur freien Verfügung. Die Return-Anweisung in 
Zeile 224 bewirkt dann den Rücksprung in das rufende Programm. In dem Unterprogramm Label E 
können die Primärspeicher STO 8, STO 9 und alle Sekundärspeicher sowie die Label 3 bis 9, B bis D 
und c bis e frei verwendet werden. 

Vor dem Start mit Label A müssen die Anfangswerte xo in STO A, yo inSTO B, yo inSTO C und 
die Schrittweite h in STO D abgespeichert werden. Das Programm beginnt mit dem Setzen des 
%1,Y1, 1 -Wertetrippels gemäß Gin. (4.5.25 bis 27). In Zeile 008 ist mit dem Label b die Start- 
addresse für die Berechnungszyklen mit der Schrittweite h eingebaut. Der Unterprogrammaufruf 
GSB E in Zeile 018 ergibt den Wert für die zweite Ableitung der Funktion im Ausgangspunkt ge- 
mäß GI. (4.5.28). Durch Multiplikation mit dem in STO E abgespeicherten Wert h?/2 wird der 
vorläufige y-Zuwachs k} gebildet und in STO 5 abgespeichert. Anschließend werden die Argumente 
für den zweiten Rechenschritt nach Gin. (4.5.30 bis 32) bestimmt. Der Unterprogrammaufruf in 
Zeile 044 führt nach Multiplikation mit dem Inhalt von STO E zu dem zweiten Wert für den vor- 
läufigen y-Zuwachs k, nach Gl. (4.5.34). Dieser wird nach STO 6 abgespeichert. In entsprechender 
Weise werden mit den Unterprogrammaufrufen in den Zeilen 054 und 082 und den nachfolgenden 
Multiplikationen mit dem Inhalt von STO E die y-Zunahme für den dritten und vierten Rechen- 
schritt bestimmt. In Zeile 097 wird der Wert 2k’ gemäß Gl. (4.5.46) nach STO O abgespeichert. 

Die Argumente der Funktion f(x,y,y’) am Ende der Schrittweite h werden mit den Anweisungen 
105 bis 110 nach STO 1,STO 2 und STO 3 abgespeichert und stehen dort für den folgenden Schritt 
als Startwerte zur Verfügung. Nach Ausgabe der Wertepaare (x,y) in den Zeilen 114 und 116 wird 
das endlose Programm mit dem Sprung nach Label b in Zeile 008 fortgesetzt. 

Die automatische Schrittweitensteuerung wird in dem Unterprogramm Label a wie bei der Differen- 
tialgleichung erster Ordnung vorgenommen. Falls das Flag 1 vor dem Programmstart gesetzt wurde, 
wird die Schrittweitensteuerung übersprungen. 
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Tabelle 4.5.2 Anweisungsliste „Differentialgleichungen zweiter Ordnung” 


Start 861 xLBLA 


882 RCLA 
683 5T01 
664 RÜLB 
885 STO2 
686 RELC 
607 _ 5T03 
688 &LBLb 
68% RCLD 
618 &2 
6il 2 
812 > 

#13  STOE 
614 RCL3 
815  RCL2 
6i6 RELI 
617 CFö 
818 G6SBE 
61$ RCLE 
828 x 

621  ST05 
822  RCLD 
823 + 

024  RÜL3 
825 + 

626  RCLS 
827 4 
825 € 

8293 RÜLD 
038 RCL3 
831 x 

032 2 
633 ® 

634 + 

635  RÜLZ 
836 + 

837 STO4 
08386 RCLD 
833 4 
846 5 

641 RC 
642 Y 

643 5STOa 
644 G6SBE 
845  RÜLE 
846 x 

647 5STO6 
848  RCLD 
843 = 

858  RCL3 
651 + 

652  RÜL4 


853 
054 
855 
856 
657 
858 
853 
868 
861 
862 


RCLB 
6SBE 
RCLE 

x 
sTo? 
STo4 
Fi? 
6T08 
65Ba 
F8? 
ETOb 
sLBL& 
RECL? 
2 


x 
RCLD 
RCL3 

+ 
RCL? 
RCL3 
RCLD 

x 

+ 


RÜLZ 
+ 


RCLD 
RELI 
+ 
6SBE 
RELE 
x 
RCL? 
RCL6 
ST+4 


186 
187 
188 
189 
116 
111 
112 
113 
114 
115 
116 
117 
UP 118 
Schritt- 119 
weiten- 128 
steuerung 121 
122 


RCL& 
RCLD 
$T+1 
ST+3 
RCLI 
SPC 
PSE 
PRTX=D x 
RCLZ 
PRTA=D y 
6TOb 
%LBla 
RCL? 
RCL6 
K=Y? 
6T02 


RÜL6 
RELS 


UP 155 


*LBLE 
RTNSF f(ix,y,y') 
R’S 
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4.5.7 Test- und Anwendungsbeispiele 


ie 
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Gegeben sei die Differentialgleichung zweiter Ordnung: 
y'=-xy' (4.5.49) 


mit den Anfangsbedingungen yo = 0, yo = 1 für xo = 0. Die exakte Lösung führt zu dem 
Gaußschen Fehlerintegral: 


x x2 


yix) = [® 2 dx (4.5.50) 


{6} 


Die gegebene Funktion muß im Anschluß an die Unterprogrammadresse Label E programmiert 
werden. Hierzu sind folgende Anweisungen erforderlich: 


Registerinhalt 


Zeilen-Nr. Anweisung Y zZ 


LABELE 


KEY 


R} 


Vor dem Programmstart durch Betätigung der Taste A sind folgende Eingaben zu tätigen: 


0 STOA _Anfangswert xXo 
0 STOB _Anfangswert yo 
1. STOC _Anfangswert yo, 
0,2 STOD Schrittweite h 


Nach etwa 5 Sekunden erscheint die auf Grund der automatischen Schrittweitensteuerung 
verdoppelte Schrittweite von 0,4 als kurze Pause in der Anzeige. 

Danach wird die Schrittweite nochmals verdoppelt zu dem angezeigten Wert 0,8. Falls der 
angezeigte Wert für die Schrittweite nicht in der Anzeigepause durch Eingabe eines neuen 
Wertes, z.B. h = 0,5 verändert wird, würde die automatische Schrittweitensteuerung immer 
zwischen diesen beiden Werten pendeln, da der Wert 0,4 jeweils verdoppelt und der Wert 
0,8 jeweils halbiert wird. In einem solchen Fall kann entweder ein anderer Wert als Start- 
wert genommen werden oder das Flag 1 ist zu setzen, damit die automatische Schrittweiten- 
steuerung ausgeschaltet wird. Neue Eingabe: 0,5 inSTOD 


Start : 


1.kurze Pause h=0,5 

2. Ausgabe x=05 

3. Ausgabe y= 0,4798 ... 

4. kurze Pause h= 0,25 (automatische Reduzierung auf h/2) 
5. Ausgabe x=0,75 

6. Ausgabe y = 0,6851 ... 

7.kurze Pause h=0,25 

8. Ausgabe x = 1,00 

9. Ausgabe y = 0,8555 ... 


Falls die Schrittweite 0,2 grundsätzlich beibehalten werden soll, ist vor dem Programmstart 
das Flag 1 zu setzen, um dadurch die automatische Schrittsteuerung zu unterbinden: 


0,2STOD Schrittweite h = 0,2 abspeichern 

STF 1 Flag 1 setzen 

Start [A]: 

Ergebnisse: 

1.x=0,2 7.x=0,8 

2. y= 0,1986 ... 8. y = 0,7222 ... 

3.x=0,4 9.x=1,0 

4. y = 0,3895 ... 10. y = 0,8556 ... Bild 4.5.3 Parallelschwingkreis 
5.x=0,6 

6. y = 0,5658 ... 


Die geringere Schrittweite macht sich in der Genauigkeit erst in der vierten Stelle bemerkbar. 
Die Rechenzeit für ein Wertepaar beträgt rund 10 Sekunden. 

Ein Parallelschwingkreis werde durch die Zuschaltung eines aufgeladenen Kondensators zur 
Zeit t=0O angestoßen (Bild 4.5.3). Die Ladespannung im Kondensator sei im Augenblick des 
Zuschaltens gleich 100 V. Die Induktivität sei L = 0,3 H und die Kapazität C = 10 uF. Für 
die beiden Widerstandswerte R = 0,1 kR und R = 1 kß ist der zeitliche Verlauf der Span- 
nung u(t) zu bestimmen. 

Die Differentialgleichung für die Spannung ergibt sich aus der Kirchhoffschen Knotenregel: 


Wein =d (4.5.51) 
c#44+l (uat=o (4.5.52) 
a pn iR: > Pe MO 
ET Ta (4.5.53) 
du 1 1 du 
ge RC 3) (4.5.54) 


Mit den Anfangsbedingungen: 
u(0) = U. (t= 0) = 100 V 


u’(0) = - 10000* für R=1KN 
: Vs; 
u’(0) =- 100000 — für R=0,1KN 


Eingaben: 
Zunächst muß die gegebene Funktion für y’’ entsprechend der Gl. (4.5.54) in dem Unter- 
programm ab Label E in Zeile 155 programmiert werden. Mit der Vereinbarung, daß die 
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Systemkonstanten R, L, C den Sekundärspeichern STO 1',STO 2’, STO 3’ zugeordnet wer- 
den, sind folgende Anweisungen einzufügen: 


Programmzeile | Anweisung 


LBLE Einsprungadresse 


Ry Roll down 
157 TPZS Speicherbereichwechsel 
158 RCL2’ holeL 
159 RCL3’  holeC 
160 x Multiplikation LC 
161 + Division u/(LC) 
162 xy Registertausch (u’ im X-Register) 
163 RCL3’ holeC 
164 RCL1’  holeR 
165 x Multiplikation RC 
166 + Division u’/(RC) 
167 13 Addition 
168 CHS Vorzeichenwechsel 


Speicherbereichwechsel 
Rücksprung mit u’ 


Vor dem Start sind folgende Werte einzugeben: 


0 STOA Anfangszeit 
100 STOB Spannung U(t= 0) 
-10000 STOC erste Ableitung der Spannung u’(t = 0) 
0,001 STOD Schrittweite gleich 1 ms gewählt 
1000 STO 1 Widerstand R 
0,3 STO.2 Induktivität L 
10°° STO3 Kapazität C 
fP2ZS (Die Systemkonstanten müssen vor dem Programmstart den Sekundär- 


speichern zugeordnet werden) 
Start: 
Als Ergebnisse werden die Wertepaare (t,u) mit der Schrittweite 1 ms ausgegeben: 


tı=  0,0010s te= 0,0060 
u] = 75,3383 V ug = - 68,6107 V 
t» = 0,0020 t7= 0,0070 
u, = 29,8008 V u7 = - 39,9778 V 
t3= 0,0030 s ta = 0,0080 s 
U = - 20,5846 V Ug=- 1,7487 V 
ta= 0,0040 t9= 0,0090 s 
ua = - 59,8230 V ug = 33,3768 V 
ts= 0,0050 tıo= 0,0100 
Us = - 76,8799 V uno = 54,8656 V 


Die Rechenzeit für ein Wertepaar beträgt rund 10 Sekunden. 


Das Ergebnis der Rechnung ist für R=1kNR und R = 0,1 k8 in Bild 4.5.4 dargestellt. 


100V Tr is 
u 
ı 50 

0 
-50 
Bild 4.5.4 
-100 | Lösung der Differentialgleichung 
5 10 15 20 25 30 ms für die Spannung u(t) 


4.6 Komplexe Rechnung 


Bei der komplexen Rechnung können die vier Grundrechenarten Addition, Subtraktion, Multipli- 
kation, Division und die Inversion ohne Speicheraufrufe ausschließlich im Stack-Register durch- 
geführt werden. In den beiden nachfolgend in Tabelle 4.6.1 angegebenen Programmen werden die 
vier Grundrechenarten Addition, Subtraktion, Multiplikation und Division sowie der Kehrwert für 
die komplexe Zahlendarstellung in Polarkoordinaten über die Startadressen Label A bis Label E 

und für die Zahlendarstellung in kartesischen Koordinaten über die Startadressen Label a bis Label e 
gestartet: 


Eingabe-Stack Ergebnis-Stack 


Startadresse X Y T 


Fr BA FT E BEE 
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Tabelle 4.6.1 Anweisungsliste „Komplexe Rechnung“ 


Variante 1 Variante 2 
Polarkoordinaten Kartesischekoordinaten 
B6i xLbih 642 «LBib 
862 6558 043 Aer 
663 655a 644 R+ 
Bö4 655 845 = 
665 RTN 646 R+ 
665 &LBLB 847 er 
887 6558 845 = 
0085 655b 649 kt 
865 6551 858 RTN 
8i8 RTN 85i «LBlc 
6il xLBLC 652 6551 
612 Kar 653 6556 
613 Rt 054 6556 
did x 655 RTN 
615 R+ 056 x*LBLd 
dis + 057 6551 
8ir Rt 056 65BD 
6is RTN 0859 6558 
619 xLBLD 866 RTN 
626 er 661 xible 
621 R+ @62 6551 
b22 = 663  6SBE 
823 Rı 864 6558 
BR 065 — RTN: 
625 = UP 866 xLBL8 
825 kt PR Ber »R 
627 RTN 068 R+ 
625 «LBLE 869 R+ 
625 17X 876 »R 
836 R+ el kt 
d&l LER CHs 672 Rt 
882 »P 632 Rt 673 RTN 
683 R+ 633 RTN UP 674 #LBLi 
854 R+ 634 &LBla R—P 85 Pr 
865 »P 635 ker 876 R+ 
636 xLBLD 685 er 036 R+ 877 Ri 
637 Aer 667 R+ 637 + 878 »P 
038 R+ A 685 Ker 838 R+ 673 kt 
833 * Zn 655 * 633 + 686 Rt 
046 R+ = 636 Rt 646 kt 681 RTN 
841 ae 63i S 641 RTN 862 R/S 
842 = 632 kt 
843 Rt 635 »R 
644 RTN 634 RTN 
645 xLBLE 695 uaLble 
d46 178 1 895 »P 
847 R+ E 697 I’k 
648 CcHS na 858 Ri 
843 kt 835 CHS 
858 RTN 166 Rt 
16i »R 
i6z RTN 
183 RS 
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In der Programmvariante 1 werden alle Operationen mit insgesamt 102 Anweisungszeilen unver- 
zweigt ausgeführt. Die einzelnen Programmteile enden jeweils mit der RTN-Anweisung. Dadurch 
können alle Teile auch als Unterprogramme aufgerufen werden. 

Die Programmvariante 2 benötigt bei Verwendung mehrerer Unterprogrammaufrufe nur 81 Pro- 
grammzeilen. In dem Unterprogramm Label O werden die beiden in Polarkoordinaten eingegebenen 
komplexen Zahlen innerhalb des Stack-Registers in kartesische Zahlen umgewandelt. In dem Unter- 
programm Label 1 wird die Umwandlung in umgekehrter Richtung durchgeführt. 


4.6.1 Test- und Anwendungsbeispiele 


Zu berechnen ist: 


(A+B)C 
a 
mit: A=3+j4 
B=2-j7 
C=4+j5 
D=5-j3 


= 
2: 
Addition: 


5 5 =3 

4 5 = 
Multiplikation: 13 24 
8 3 13 

5 -3 13 


Division: 


Ergebnis: Z=4 + j5 = 6,40 e)9'.3#° 

Unter Beachtung, daß bei der komplexen Rechnung stets Wertepaare einzugeben sind (Imaginärteil 
bzw. Winkel und anschließend Realteil bzw. Betrag), verläuft die Rechnung nach den Regeln der 
umgekehrten polnischen Notation. Anstelle der Operator-Tasten + - x + sind dann bei Polarkoor- 
dinaten A, B,C,D und bei kartesischen Koordinaten a, b,c,d zu betätigen. 

Bei Betätigung der Tasten E bzw.e wird der komplexe Kehrwert 1/Z gebildet, analog zur 1/x-Taste 
für reelle Zahlen. 
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Bei der Rechnung mit komplexen Größen muß jedoch darauf geachtet werden, daß ein fiktives 
Stack-Register mit nur zwei Ebenen wirksam ist. Daher können ohne Zwischenspeicherung nicht 
mehrere Operationen hintereinander ausgeführt werden. 

Beispiel: 

In einem elektrischen Stromkreis sind zwei komplexe Widerstände Z, = (5 + j20) 2 und 

Z.» = (10-50) parallel geschaltet. Für den komplexen Gesamtwiderstand gilt: 


[ENTER] 
5 


Eingaben: 20 [ENTER] 
-50 


10 
[al Addition in kartesischen Koordinaten 
Eingaben: 20 
5 
[a] Division in kartesischen Koordinaten 
Eingaben: -50 
10 
[r][e] Division in kartesischen Koordinaten 
[e] Kehrwert in kartesischen Koordinaten 
Ergebnis: X-Register Y-Register 
zZ, =15,33 0; Z; =27,33 0 (kartesische Koordinaten) 
: 2, =31,340; 9% = 60,71° (Polarkoordinaten) 


4.7 Harmonische Analyse 


4.7.1 Numerische Bestimmung der Fourier-Koeffizienten 


Bei empirisch vorgegebenen periodischen Funktionen und in allen Fällen, bei denen die Integrale 

zur exakten Berechnung der Fourier-Koeffizienten formelmäßig nicht lösbar sind, ist man auf ihre 
numerische Bestimmung angewiesen. Die hierzu notwendigen Gleichungen liefert die Theorie der 
diskreten Approximation [15]. Wenn auch die Fourier-Koeffizienten, wie bereits in Abschnitt 4.4.9 
gezeigt, mit Hilfe des Programms zur numerischen Integration bestimmt werden können, so soll doch 
der breiten Anwendung dieser Aufgabenstellung entsprechend ein auf den speziellen Anwendungsfall 
zugeschnittenes Programm entworfen werden. Daher wird nach kurzer Darstellung des mathema- 
tischen Rüstzeuges der Aufbau eines besonders einfach zu handhabenden Programms zur Bestim- 
mung der numerischen Fourier-Koeffizienten erläutert. 
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4.7.2 Berechnungsverfahren 


Das Intervall [0,2] der periodischen Funktion f(x) wird in 2N Streifen gleicher Breite Ax ein- 
geteilt. Damit kann die Funktion f(x) durch n= 2 N Funktionswerte f(x;) an den n Stützstellen 
x; beschrieben werden: 


N N-1 
f(x) =Ao + 2 A, coskx; + 3 B« sinkx; (4.7.1) 
=1 K=1 
o 
Ax u bzw. Ax° „280 (n geradzahlig) (4.7.2) 
%. = TAX mit ie 0.1.2, 01 (4.7.3) 


Mit Hilfe der n Stützstellen lassen sich insgesamt n numerische Fourier-Koeffizienten nach folgen- 
den Gleichungen bestimmen: 


1 n-1 
A) (4.7.4) 
i=0 
„nt 
Ass > f(x) coskx; (4.7.5) 
Kap mit k=1,2,.,n-1 
Per 
Bk == > f(x;) sin kx; (4.7.6) 
i=0 
1 n=1 
An=n > flx)eosim (4.7.7) 
i=0 


Unter Einbeziehung der besonderen Eigenschaften symmetrischer Funktionen vereinfachen sich die 
Beziehungen derart, daß bei gerader Symmetrie, d.h. f(x) = f(-x), die Koeffizienten B, und bei 
ungerader Symmetrie, d.h. f(x) =-f(-x), die Koeffizienten An und A, verschwinden. Die n + 1 
Stützpunkte brauchen dann nur über die halbe Periode gleichmäßig verteilt zu werden. Dabei ist 
jedoch zu beachten, daß die Funktionswerte f(xo) und f(x„) nur mit dem halben Wert in die 
Summe eingestellt werden dürfen: 


a oc”. 180° > 
Ax = = bzw. Ax = = (n geradzahlig) (4.7.8) 
x;=iAx mit i=0,1,2,..,n (4.7.9) 
1 n 
Ao=n ) aflıı) (4.7.10) 
i=0 
ERS 
Ak m ya af(x;)coskx; (4.7.11) 
> k=1,2,..,n-1 
20 
Bk u > af(x;) sinkx; (4.7.12) 
i=0 
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An -1 S; af(x;)cosim (4.7.13) 
i=0 


a -3 für i=0 und i=n, sonst a=1 (4.7.14) 
Die Funktion nach GI. (4.7.1) entsteht aus einem unendlich ausgedehnten Frequenzspektrum da- 
durch, daß alle Oberschwingungen mit der Ordnungszahl >N durch einen Tiefpaß weggedämpft 
werden. 
Die numerischen Fourier-Koeffizienten stimmen daher mit den exakten Koeffizienten um so 
besser überein, je schneller die Glieder höherer Ordnung abklingen und somit keinen Beitrag zu 
der Approximation mit Hilfe der n’Stützwerte liefern. Die exakte Fourier-Analyse: 


oo 
f(x) =a0 + > (a, coskx + b« sinkx) (4.7.15) 
K=1 


kann durch die endliche Summe mit den numerischen Koeffizienten approximiert werden: 


n 
fx) = Ao + > (Ax coskx + B« sinkx) + An++ı cos(n” +1)x (4.7.16) 
K=1 


mit 


5-1 bein Stützwerte auf 2 
n* = j (n gerade) (4.7.17) 
n-1 bein+ 1 Stützwerte auf 


Die Genauigkeit der Übereinstimmung zwischen den numerischen Fourier-Koeffizienten A, , Bx 
mit den korrespondierenden analytischen Fourier-Koeffizienten a,, bk nimmt mit zunehmender 
Ordnungszahl k ab. Wegen des Tiefpaß-Charakters technischer Systeme ist jedoch das Frequenz- 
spektrum nach oben beschränkt, so daß bei genügend großer Zahl Stützstellen die numerischen 
Koeffizienten das wirklich vorhandene Frequenzspektrum recht genau aufzeigen. 


4.7.3 Programmstruktur 


Das Programm besteht aus einem Organisationsteil für die Übernahme und Zuweisung der Stütz- 
werte und aus einem Berechnungsteil, in dem je nach Art der vorgegebenen Symmetriebedingungen 
die erforderlichen Berechnungsgänge durchlaufen werden. Die Fourier-Koeffizienten werden be- 
ginnend mit dem Gleichstromglied A, über die Cosinusglieder A, und den Sinusgliedern B, be- 
rechnet. Koeffizienten mit Amplituden unter 10°? werden nicht ausgegeben. Im Ausdruck erscheint 
jeweils die Ordnungszahl des berechneten Koeffizienten ohne Kommastellen und der zugehörige 
Amplitudenwert mit 2 Kommastellen. Für die harmonische Analyse einer beliebigen unsymme- 
trischen Funktion mit 20 Stützwerten werden rund 10 Minuten Rechenzeit benötigt. 


4.7.4 Symmetrieeigenschaften 
Um die Symmetrieeigenschaften im Sinne einer höheren Approximationsgenauigkeit oder einer ver- 


ringerten Anzahl Stützpunkten nutzbar zu machen, kann die spezielle Funktionseigenschaft durch 
die Eingabe der Kennziffern 0,1,2 oder 3 in STO A festgelegt werden. Bei Kennziffer O0 inSTO A 


58 


werden die Stützpunkte ohne Berücksichtigung von Symmetriebedingungen über das Intervall [0,2] 
als gleichmäßig verteilt angenommen. Die in STO B abgespeicherte Anzahl der Stützpunkte muß ge- 
radzahlig sein. 

Bei Kennziffer 1 in STO A wird eine ungerade Funktion f(x) =-f(-x), d.h. Spiegelung um den 
Nullpunkt, vorausgesetzt. Die in STO B abgespeicherte Anzahl der Stützwerte enthält nun auch 

den Punkt am Intervallende, so daß der abgespeicherte Wert ungeradzahlig sein muß. Gegenüber 

der Auswertung ohne Berücksichtigung der Symmetrie sind bei gleicher Approximationsgenauig- 
keit nur 5+ 1 Stützwerte erforderlich. Die harmonische Analyse der gegebenen Funktion wird nur 
für die B-Koeffizienten (Sinus-Koeffizienten) durchgeführt. Bei Kennziffer 2 inSTO A wird eine 
gerade Funktion f(x) = f(-x), d.h. Spiegelung an der Y-Achse, vorausgesetzt. Die Auswertung er- 
folgt entsprechend zur ungeraden Symmetrie nur für die A-Koeffizienten (Cosinus-Koeffizienten). 


Versetzt symmetrische Funktionen 


Bei einer um eine halbe Periode versetzt symmetrischen Funktion f(x) = f(x - m) oder f(x) = 
=-f(x-m) genügt es, die Stützpunkte auf eine halbe Periode zu verteilen. Dabei ist in STO A 
der Wert 3 zu wählen, damit die A-Koeffizienten und B-Koeffizienten wie für STO A = O nach- 
einander berechnet werden. Dies wird durch die Vergleichsabfrage und den Sprungbefehl in den 
Zeilen 30 und 31 erreicht. Um 7 versetzt symmetrische Funktionen der zweiten Art 

f(x) =- f(x - m) nennt man alternierende Funktionen. 

Um die Rechenzeit durch diese Variante nicht unnötig zu erhöhen, wurde auf die programmtech- 
nische Auswertung der Eigenschaft, daß bei um versetzt symmetrische Funktionen der ersten 
Art nur geradzahlige Koeffizienten und bei alternierenden Funktionen nur ungeradzahlige Koeffi- 
zienten existieren, verzichtet. Daher sind bei Anwendung dieser Variante (mit STO A = 3) bei 
f(x) = f(x - m) die ungeradzahligen und bei f(x) =- f(x - m) die geradzahligen Koeffizienten ein- 
schließlich Ao zu streichen. 

Die um 7 versetzt symmetrische Funktion erster Art ist über das Intervall [0, ] periodisch und 
kann daher auch mit Kennziffer O behandelt werden. Die Frequenz der Grundschwingung ist dann 
auf das Intervall m bezogen. Dieser Fall liegt z.B. bei Vollwellengleichrichtung vor, wo die Grund- 
schwingung die doppelte Frequenz der erzeugten Wechselspannung aufweist. 


4.7.5 Programmbeschreibung „Harmonische Analyse‘ 


Der Eingabeteil des Programms nach Tabelle 4.7.1 wird durch Betätigung der Taste E aufgerufen 
und führt an den physikalischen Anfang des Programms. In Progräammzeile 002 wird das Unterpro- 
gramm Label d ab Zeile 149 aufgerufen. In diesem Unterprogramm wird in Zeile 153 das Flag 1 
immer dann gesetzt, wenn der Inhalt von Speicher A ungleich null ist. Vor dem Rücksprung in das 
rufende Programm wird bei Berücksichtigung der Symmetriebedingung der Wert 1 in das X-Register 
übernommen. Ist keine Symmetriebedingung zu berücksichtigen, so wird der Wert 2 übergeben. An- 
schließend wird die Schrittweite Ax berechnet und in Zeile 009 nach STO C abgespeichert. Nach 
Nullsetzen der Kommastellen für die Ausgabe wird in die Zeile 012 das Indexregister I Null gesetzt 
und somit die bis zur Programmzeile 025 reichende Eingabeschleife c vorbereitet. Innerhalb der 
Eingabeschleife wird die jeweilige Koordinate des Stützwertes x; ausgedruckt und der Index i an- 
gezeigt. Zur Eingabe des jeweiligen Stützwertes ist ein Unterprogramm Label e am physikalischen 
Ende des Programms vorgesehen. Es umfaßt zwischen der Einsprungadresse Label e in Zeile 161 
und der Rücksprunganweisung RTN in Zeile 163 lediglich eine STOP-Anweisung. Da beim Ein- 
sprung in dieses Unterprogramm im X-Register der Index i des Stützwertes und im Y-Register der 
Winkel in Grad des jeweiligen Stützpunktes auf der Abszissenachse x; übergeben wird, kann für 
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Tabelle 4.7.1 Anweisungsliste „Harmonische Analyse’ 


656 
662 65Bd 857 
883 1 858 
884 6 853 
865 6 868 
866 Ale 861 
887 6553 862 
866 * 863 
883 STOC 864 
sie DSP6 —865 
811 [ 866 
ei2  STOI 867 
613 »LBLe 865 
8i4  RELC 863 
615 RELI 878 
eis x 871 
617 PRTX=Dy; 672 
ei6 LSTA 873 
819 6SBe 874 
828 STOi 875 
621 1821 876 
022 RELI 877 
623  RCLB 878 
824 387? 673 
625  6T0c 656 
626 »LBLC 881 
827 SPC 682 
628 RÜLA 883 
823 3 884 
030 xy? 885 
e3i 6T0i d86 
632 Fi? 667 

033 6706 888 
034 »LBLi 889 
835 SF2 898 
636 6TON 631 

+6837 »LBL8 832 
636  RÜLA 693 
033 1 894 
048 x=1? 895 

841  6TOB 896 
842 xLBLA 897 
843 8 895 
844  STOE 895 
845 sF& 188 
046 6T0a 181 
847° xLBLB 182 
848 1 183 
845  STOE 184 
058 CF& 185 
0851 &LBla 186 
852 8 107 
853  STOI 1868 
054 STOD u 63 
855 655d 116 
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&LBib 
RCLI 
RELC 

x 
RCLE 
x 


F8? 
6T01 
5IN 
6702 
#LBL1 
cos 
#LBL2 
RCLi 


x 
RCLA 
&=8° 
6701 

R+ 
RELI 
3=0? 
6T08 
RCLB 


111 
112 
113 
114 
115 
116 
117 
116 
113 
126 
121 
122 
123 
124 
125 


126 
127 
128 


129 
138 
131 
132 
133 
134 
135 
136 
137 
136 
139 
UP 148 
141 
142 


143 
14 
145 
146 
147 
148 
UP 143 
158 
151 
152 
153 
154 
155 
156 
157 
158 
153 
166 
UP i6l 
162 
163 
164 


65Bd 


RCLE 
i=1? 
6TL1 
i=8? 
6TOL 
2 
STxi 
&LBLi 
DSP& 
RCLE 
PRTA=D i 
RCLD 
DSP3 
PRTA=D A,B; 
SPC 
%LBL8 
ISZI 
RCLE 
ISzi 
6583 
65Bd 
Kr? 
6Tda 
F2? 
6TGE 
R/S 
#LBL3 
RCLB 
f1? 
£T08 
RTN 
#LBL8 
1 
RTN 
*LBLd 
Ci 
RELA 
$#6? 
Sri 
Rr 
1 
Fi? 
RTN 
[x 
2 
RTN 
xLBle 
RrS<E yj 
RTN 
R-S 


analytisch erklärte Funktionen an Stelle der R/S-Anweisung eine Anweisungsfolge zur Berechnung 
des Stützwertes f(x;) in einem Umfang bis zu 61 Programmzeilen eingefügt werden. 

Die Eingabeschleife wird bei der Startadresse Label C in Zeile 026 verlassen, wenn der Inhalt des 
Indexregisters die Anzahl der erforderlichen Stützwerte übersteigt. Wenn Flag 1 nicht gesetzt ist, 
d.h. die eingegebenen Stützwerte erstrecken sich über das Intervall [O, 2], wird das Flag 2 gesetzt 
und damit eine Weiche gestellt, um zunächst die A-Koeffizienten und anschließend die B-Koerfi- 
zienten zu berechnen. Ist dagegen das Flag 1 gesetzt, wird in der Zeile 040 durch eine Äquivalenz- 
abfrage festgestellt, ob die vorliegende Funktion als ungerade Funktion oder als gerade Funktion 
behandelt werden soll. Ist in STO A eine 1 abgespeichert, d.h. die Funktion ist ungerade, erfolgt 
ein Sprung nach Label B in Zeile 047, so daß nur die B-Koeffizienten berechnet werden. Anderen- 
falls werden nur die A-Koeffizienten berechnet. In beiden Fällen endet das Programm in Zeile 139. 
Die Ordnungszahl der Oberschwingung beginnt für die A-Koeffizienten mit O und für die B-Koeffi- 
zienten mit 1 und wird in STO E abgespeichert. Die Berechnung der Fourier-Koeffizienten beginnt 
mit dem Sprung nach Label a in Zeile 051. Hier werden zunächst das Indexregister und der als 
Summierspeicher vorgesehene Speicher D Null gesetzt. Die Summierschleife erstreckt sich von Pro- 
grammzeile 056 mit Label b bis zu der Rücksprunganweisung in Zeile 098. Innerhalb dieser Schleife 
ist mit den Anweisungen in den Zeilen 071 bis 090 die Korrektur des ersten und letzten Summanden 
für die Analyse symmetrischer Funktion in dem Intervall [O, m] eingebaut. Die Multiplikation mit 
einer Sinus- oder Cosinusfunktion des Abszissenwertes wird über die Flag-O-Abfrage in Zeile 062 
gesteuert. Mit den Anweisungen 099 bis 101 wird die indirekte Adressierung für den Speicher 

STO D vorbereitet. Jeder berechnete Koeffizient wird durch die Anweisungen in den Zeilen 102 
bis 107 dahingehend überprüft, ob sein Betrag größer als die gesetzte Schranke e = 10°® ist. Falls 
dies nicht der Fall ist, werden die Anweisungen für die Ausgabe übersprungen. Die neue Ordnungs- 
zahl zur Berechnung des folgenden Koeffizienten wird mit Hilfe der ISZ (i)-Anweisung in Zeile 131 
gebildet. 

Falls die Abfrage in Zeile 107 mit nein zu beantworten ist, wird durch den Aufruf des Unterpro- 
gramms Label 3 in Zeile 109 die größte gerade Zahl der in STO B abgelegten Anzahl Stützpunkte 
ins X-Register übernommen. Dieser Wert wird als Divisor für die nachfolgende Registerarithmetik- 
Operation mit dem Speicher STO D benutzt. Mit den folgenden Anweisungen 111 bis 120 werden 
der Faktor a nach Gl. (4.7.14) verarbeitet und die unterschiedlichen Bildungsgesetze der Koeffi- 
zienten Ayo, An, gegenüber den Koeffizienten A,, B, berücksichtigt. 

Die Ordnungszahl des berechneten Fourier-Koeffizienten wird durch die Anweisung in Zeile 123 
ausgegeben. Die berechneten Fourier-Koeffizienten werden mit drei Kommastellen ausgedruckt 
und gegeneinander durch eine Leerzeile abgesetzt. 

Mit der Abfrage in Zeile 135 wird festgestellt, ob die Ordnungszahl gemäß der Gl. (4.7.17) für die 
Fourier-Koeffizienten erreicht ist. Falls dies noch nicht der Fall ist, wird die Programmbearbeitung 
bei Label a in Zeile 051 fortgesetzt. Anderenfalls wird je nach dem Ergebnis der Flag-2-Abfrage die 
Berechnung der B-Koeffizienten aufgerufen oder der Programmlauf gestoppt. 

Für alternierende Funktionen mit STO A = 3 wird durch die Abfrage in Zeile 030 die Flag-Abfrage 
in Zeile 032 übersprungen, so daß zunächst alle A-Koeffizienten und anschließend alle B-Koeffi- 
zienten berechnet werden. Falls nach Abschluß einer Durchrechnung einzelne Amplitudenwerte 
geändert werden sollen, so kann dies in den einzelnen Speichern selektiv durchgeführt werden. Das 
Programm wird dann durch Label C in Zeile 026 hinter der Eingabeschleife gestartet. 


4.7.6 Anwendungsbeispiele 


Die Stromkurve einer mit 90° Phasenanschnittsteuerung an eine sinusförmige Wechselspannung be- 
triebene Ohmsche Belastung soll analysiert werden. 
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Die analytische Lösung lautet für beliebigen Phasenanschnittwinkel «: 


a} = 2 100520-1) 


1 [1-cos2na 1-cos2(n+1)«a PER 
| r a | für n= 1,2,3,. 
1 : 
b} =, [2(n 0) + sin2«] 


in2(n+1 i 
1 [sin2(n+1)« unzne | für n=1,2,3, ... 


Ban+ı "77 #1 n 


für a=5 folgt: 


| 
a = 7 
ı für n ungerade 
mn 
A2n+ı ” 1 
zT für n gerade 
1 
b “2 
ban+ı =0 tur n=1,2,3, .-- 


Über die Periodendauer T werden 20 Stützpunkte äquidistant verteilt, so daß sich der Abstand 
zweier Stützpunkte mit 18° ergibt. 
Eingaben: 0 STOA (da Intervall 2m) 

20 STO B (Anzahl der Stützpunkte) 


Start: 
OT Ausansek [Anzeige | Eingaben | 
1. STOP: 0° 0 0, RS 
2. STOP: 18° 1 0, RS 
3. STOP: 36° 2 0, RS 
4. STOP: 54° 3 0, R/S 
5. STOP: 72° 4 0, RS 
6. STOP: 90° 5 0,5 R/S 
7. STOP 108° 6 xy, SIN, R/S 
8. STOP 126° 7 xy, SIN, R/S 
9. STOP 144° 8 x=y, SIN, R/S 
10. STOP 162° 9 xzy, SIN, R/S 
11. STOP 180° 10 0, R/S 
12. STOP 198° 11 0, R/S 
13. STOP 216° 12 0, R/S 
14. STOP 234° 13 0, RS 


Ausgedruckte Ergebnisse: 
A, = 0,308 (- 0,31831) B, = 0,500 (0,50000) 
A3 = 0,308 ( 0,31831) 
As = - 0,073 (- 0,10610) 
A, = 0,073( 0,10610) 


(Werte in Klammern sind analytisch exakt berechnet) 
Rechenzeit rund 15 Minuten 
Bearbeitungszeit (Rechenzeit und Eingabe): rund 20 Minuten 


Verteilt man unter Ausnutzung der alternierenden Eigenschaft über das Intervall [O, m] 19 Stütz- 
punkte, so läßt sich eine höhere Übereinstimmung der numerischen Fourier-Koeffizienten mit den 
analytisch exakten Werten erzielen. 


Eingaben: 3 STOA (da Intervall m) 
19 STOB (Anzahl der Stützpunkte) 
Start [le]: 


Nach STOP mit Anzeige Obis 8: Eingabe 0, R/S 
Nach STOP mit Anzeige 9: Eingabe 0,5 R/S 
Nach STOP mit Anzeige 10 bis 18: EingabexZy, SIN, R/S 


Als Ergebnisse werden alle Koeffizienten von An bis Ajg und von B; bis B,& ausgegeben. Da es 
sich um eine alternierende Funktion handelt, sind nur die ungeraden Koeffizienten vorhanden. 


Ergebnisse: 


Aı =-0,315 (- 0,31831) B, = 0,500 (0,50000) 
As = 0,315 ( 0,31831) 
- 0,096 (- 0,10610) 
0,096 ( 0,10610) 
Ag =- 0,047 (- 0,06366) 
Arı = 0,047 ( 0,06366) 
Ara = - 0,020 (- 0,04547) 
Aıs = 0,020 ( 0,04547) 


Rechenzeit rund 20 Minuten 


>> 
na 
I 


Die zusätzlich ausgegebenen geraden Koeffizienten gelten für die um versetzt symmetrische Funk- 
tion. Der Koeffizient Ao = 0,318 entspricht z.B. dem arithmetischen Mittelwert einer Halbwelle 
bei 90° Phasenanschnitt. 

Die Amplitude und der Null-Phasenwinkel der Grundschwingung ergeben sich durch Umwandlung 
der Grundschwingungskomponenten in Polarkoordinaten: 


—- 0,32 ENTER (Cosinus-Anteil der Grundschwingung) 
0,50 >P 3 (Sinus-Anteil der Grundschwingung) 
Ergebnis: 0,59 e 22.62 (Amplitude und Null-Phasenwinkel der Grundschwingung) 
Der Leistungsfaktor der Grundschwingungsblindleistung beträgt somit cos p = 0,84. 


Die Ergebnisse der numerischen Fourier-Analyse sind in Bild 4.7.1 als Zeigerdiagramm und als 
Liniendiagramm dargestellt. 
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b -05 Z Baer 


Bild 4.7.1 Zeigerdiagramm (a) und Liniendiagramm (b) der Ergebnisse einer numerischen Fourier-Analyse 


4.8 Lösung nichtlinearer Gleichungssysteme mit Hilfe der Newton-Raphson-Methode 


4.8.1 Berechnungsgrundlagen [32] 


Ein Gleichungssystem zweiter Ordnung kann durch die allgemeine Form: 


f} (X1,X2) =0 
f2 (x1,%2) =0 


beschrieben werden. 

Ausgehend von den geschätzten Lösungswerten a und N fragen wir, welche Differenzvariablen 
Axl0) und Ax0) zu den Schätzwerten hinzugefügt werden müssen, damit das gegebene Gleichungs- 
system erfüllt wird: 


f(x! + ax, x 4 axlO) = 0 (4.8.1) 
f2 (x + ax, x) + ax) = 0 (4.8.2) 


Die Entwicklung dieser beiden Gleichungen in eine Taylor-Reihe um die Schätzwerte x!" und x! 


liefert: 


öf, (0) df, (0) 

(xl, x) + AxI?) (5) + Axl?) (53) +..=0 (4.8.3) 
af (0) of (0) 

10x, x") + Ax?) ae + Axd) Er +..=0 (4.8.4) 


Bei Vernachlässigung der Glieder höherer Ordnung ergibt sich in Matrix-Schreibweise: 


KO Hy AxO z0Q (4.8.5) 
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Hierin bedeuten: 


(0) (0) 
gl) = & x ' x2 | (Ausgangsvektor) 
1, 0) 
af, \(9 of, 7 
ee 
„0 - (Jacobi-Matrix) 
/df, “ E Ir 
am / 0Xo 
Axl0) 
Ax'? = (0) (Differenzvektor) 
Ax, 


Der unbekannte Differenzvektor Ax'?) 


Ax'? Fe [y‘® ii ” g 


4.8.2 Anwendung für Systeme bis zweiter Ordnung 


ergibt sich durch Inversion der Jacobi-Matrix: 


(4.8.6) 


(4.8.7) 


(4.8.8) 


(4.8.9) 


Das gegebene Gleichungssystem werde durch folgende allgemeine Polynome zweiten Grades 


beschrieben: 


fı =aıx + bıxd + cıXiR2 +dıXıX + e1XıX%2 + Fı%ı +g1%X2 + hı = 0 
a2 2 2 2 S 
f2 = a2x7 + baxZ + caXjx2 + daxıX2 + eaXıX2 + faXı + 9g2X2 + h2 = 0 


Aus dem gegebenen System folgt für die Elemente der Jacobi-Matrix: 


of, 
2 
411 en (aı +c4%2) + dıx3 + &1Xa +fj 


ı 
= EM > 2 
ee un +dıXı) +cı1XT + e&1Xı +97 


of 
azı = = 2xı laı +CaX2) + ax + eaxa + f 
21° 9x, 11a] + C2%2 2X2 te2X2 +12 


f2 
92" 7,” 2x2(b2 + daxı) +Cax7 + eaXı +92 
Nach Inversion der Jacobi-Matrix folgt für den Differenzvektor: 


E.;1 
71922 "412471 


a22 "12 


Ax' x g(o) 


31 d&ı 
Daraus ergeben sich für die beiden Differenzvariablen: 


Zi 0), 
11922 — 412471 


(0) (0) 
Axı 7 (aaafı a1afz 


=1 ©), 
11422 412471 


(0) o 
Axz = -ayfr +a1ıfz 


(4.8.10) 


(4.8.11) 


(4.8.12) 


(4.8.13) 


(4.8.14) 


(4.8.15) 


(4.8.16) 


(4.8.17) 


(4.8.18) 
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Für die verbesserten Lösungswerte gilt: 


„in = „0 er Ax'0) (4.8.19) 
„I 2 „.o) er AxlO) (4.8.20) 


Der endgültige Lösungsvektor kann in Abhängigkeit von der geforderten Genauigkeit (| Ax|<e) 
nach mehrmaliger Iteration erreicht werden. 


4.8.3 Programmstruktur ‚„Newton-Raphson-Methode‘' 


Die Programmstruktur ist in Bild 4.8.1 als Flußdiagramm angegeben. Zunächst werden die beiden 
Funktionswerte f} und f» nach GI. (4.8.10 und 4.8.11) in einem Unterprogramm Label C berech- 
net. Anschließend werden die Koeffizienten der Jacobi-Matrix in den Unterprogrammen Label a 
und Label b gemäß den Gin. (4.8.12 bis 4.8.15) berechnet. Aus diesen Ergebnissen ergeben sich 
aus den Gin. (4.8.17 und 4.8.18) die Differenzwerte Ax'0) und Ari! zur Verbesserung der Start- 
werte „0 und xD Nachdem die verbesserten Funktionswerte gar und we gemäß den Gin. 
(4.8.19 und 4.8.20) gebildet wurden, wird die Programmschleife nach Maßgabe einer vorgegebenen 
Genauigkeitsforderung e erneut durchlaufen. Hierzu 
wird die Betragssumme der beiden Differenzwerte 
mit der Schranke e verglichen. Zur Abkürzung der 
Rechenzeiten kann in den kurzen Pausen zur Anzeige 
der Differenzwerte über die Tastatur der Wert O als 
Ersatz für den angezeigten Korrekturwert eingegeben 
werden. Als Endergebnis wird das iterativ erreichte 
Lösungs-Wertepaar x!” ‚x(") ausgegeben. 


Unterprogramm 
Label C 
Berechnung: 19, 3 


Unterprogramm 
Label a, Label b 
Berechnung: 
Jacobi-Koeffizienten 


Berechnung: 
(n) (n) 
Axı ,Axz 


Berechnung: 


(n+1) (n+1) 
ı %2 


Bild 4.8.1 
Flußdiagramm „Newton-Raphson-Methode” 
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4.8.4 Programmbeschreibung ‚„Newton-Raphson-Methode”' 


Das in Tabelle 4.8.1 angegebene Programm wird mit der Startadresse Label A in Zeile 001 gestartet. 
In Zeile 002 wird das Unterprogramm Label C zur Berechnung der Funktionswerte f} (X},X2) und 
f2(X},%2) aufgerufen. Dieses Unterprogramm umfaßt die Anweisungszeilen 073 bis 104. Hierin 
werden die Argumente x; und x» den Speichern STO A, STO B und die Polynomkoeffizienten a, 
bis h, den Primärspeichern und STO O bis STO 7 bzw. die Koeffizienten a, bis h2 den Sekundär- 
speichern STO 0’ bis STO 7’ entnommen. Die Funktionswerte f}, fa werden nach STO C bzw. 
STO D abgespeichert. Mit dem Aufruf der Unterprogramme Label a von Zeile 111 bis 139 und 
Label b von Zeile 140 bis 171 werden die Koeffizienten der Jacobi-Matrix berechnet. Die Koeffi- 
zienten werden folgenden Speichern zugeordnet: 

In Zeile 005 a,ı nach STO8 

In Zeile 007 a]2 nach STO9 

In Zeile 012 azı nach STO 8’ 

In Zeile 014 az» nach STO 9’ 


Die Determinante der Jacobi-Matrix wird in Zeile 023 nach STO E abgespeichert. In kurzen Pausen 
werden die Differenzwerte Ax, und Ax, angezeigt. Für die Genauigkeitsabfrage der Iteration in 
Zeile 066 wird die Betragssumme der beiden Differenzwerte mit e = 10°? verglichen. Falls die 
Summe kleiner e ist, wird der Ergebnisvektor in den Zeilen 069 und 071 angegeben. Anderenfalls 
wird ein weiterer Iterationszyklus durch einen Rücksprung nach Label A in Zeile 001 begonnen. 


4.8.5 Anwendungsbeispiel 


Mit dem Programm können die Schnittpunkte beliebiger Kegelschnitte in der Ebene berechnet wer- 
den. Als Beispiel sollen die Schnittpunkte zweier Kreise gemäß Bild 4.8.2 aufgesucht werden: 


Kreis 1: (x-5)? +(y+2)? = 4? 

Kreis 2: (x-3)2 +(y- 2)? =3? 

Die Polynomform der beiden Kreisgleichungen lautet: 
x? + y? - 10x +4y + 13=0 
x? +y2 - 6x-4y+ 4=0 


Bild 4.8.2 
Startpunkte mit konvergierenden Lösungsgraphen 
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Tabelle 4.8.1 Anweisungsliste „‚Newton-Raphson-Methode” 


Start _B6i_ &LBLA 
@6z 


GSBC 
683  STOC 

664 65Ba 

685  STOS 

BEE 65h 

667 STOS 

BOB F2S 

883 | 6SBC 

818 | SToD 

611 | 65Ba 

612 | STOg 669 PRTÄ=Dx 
613 | 65Bb 878 RCLB 
614 | STO9 871 FRTIA=DX 
615 | RCLB 072 RS, 
bis“ Pr Up 673 #LBLC 
617 RELS 674 6 
68 x 675  STOI 
019 xer 676  RCLA 
626 RLLE m x 
Bi x 678 RÜLi 
Bo - 073 x 
623 STOE 088 RLLB 
624 RCLC 61 &2 
625m FxS 662 65B6 
626 | RCLS 683  RCLA 
er| x 64 2 
625 | RCLD 085 RCLB 
029 = PxS BE x 
636  RLLS 687  65B8 
31. * 688 RCLB 
02 - 683 x 
633  RÜLE 698  RCLA 
64: In) ei x 
035 PSE=DAX1 692  65B8 
636  STO9 693  RCLA 
637 _ RELC 694  RCLB 
638 m PxS 65 x 
633 | RCLE 696  6SBA 
Ge | x 897 RCLA 
641 | RCLD 698  65BB 
842 de PxS 899  RCLB 
643 RELB 188 6558 
B4 x ei 1821 
65 - 162 RCLi 
646  RÜLE 18 + 
7 oo: 184__RTN 
648 CHS In) up 105 +LBL& 
843 PSE=DAX, 186 1521 
658  STOS 167 RCLi 
651 RCLB 168 x 
062 + 18 + 
653  STOB ar fe RIN 
654  RCLI üp 111 »*LBla 
055  RELA 112 8 
06 + 113  STOI 
857  STOR 114 RELi 
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Vor dem Programmstart mit Label A sind folgende Eingaben zu tätigen: 


1STO0: Koeffizient a} von x? 
1STO 1: Koeffizient b} von y? 
0STO 2: Koeffizient c; von x?y 
0STO3: Koeffizient dı von xy? 
OSTO4: Koeffizient e} von xy 

-10STO5: Koeffizient f} von x 
4STO6: Koeffizient g; von y 
13 STO 7: Konstantes Glied h} 


Speicherbereichswechsel 


1STO0': Koeffizient a, von x? 
1STO 1’: Koeffizient b, von y? 
0STO?': Koeffizient cz von x?y 
0STO3': Koeffizient d». von xy? 
OSTO4': Koeffizient ez von xy 
-6STO5’: Koeffizient f von x 
-4STO6': Koeffizient ga von y 
4STO 7’: Konstantes Glied h> 


Startwerte: OSTO A, STOB 


Start 


In kurzen Pausen werden die Komponenten des Differenzvektors nach Gl. (4.8.9) angezeigt: 


1. Iteration: Axl0) = 1,06 3. Iteration: Axl? = 0,01 
Ax - 0,59 Ax®’= 0,01 

2. Iteration: Axı'’= 0,23 4. Iteration: Ax| = 2,63: 10°5 
Ax’= 0,11 AxQ’= 1,32-.10°5 


Ergebnisse: x} = 1,30 
Yı=0,47 
Rechenzeit rund 100 Sekunden 
Startwerte: 10 STO A, 0OSTOB 
Start 
Nach 6 Iterationszyklen ist das Ergebnis erreicht. 


Ergebnisse: x» = 6,00 

Y> = 1,87 
Rechenzeit rund 2 Minuten 
In Bild 4.8.2 sind die Lösungsgraphen der Iterationszyklen eingetragen. Startpunkte, die auf der 
Verbindungslinie der beiden Kreismittelpunkte liegen, führen zum Abbruch des Programms. Bei 
diesen Startpunkten wird die Determinante aus den Koeffizienten der Jacobi-Matrix gleich null. 
Damit wird gemäß GI. (4.8.16) eine Division durch null versucht, die mit Error Anzeige abge- 
brochen wird. Alle Startpunkte, die unterhalb dieser Verbindungslinie liegen, ergeben das Lösungs- 
paar des Punktes P, und alle Startpunkte oberhalb dieser Linie ergeben das Lösungspaar P». 
Zur Theorie und dem Konvergenzverhalten der Newton-Raphson-Methode wird auf das Schrifttum 
[33, 34] verwiesen. 


69 


5 Finanzmathematik 


5.1 Rentenberechnung 


In der Finanzmathematik versteht man unter dem Begriff Rente eine auf gleichbleibende Zeitab- 
stände vereinbarte Zahlungsverpflichtung. Die Variablen der Rentenberechnung sind das der Rente 
äquivalente Kapital, die Laufzeit der Rente und der für Kapitalwertbetrachtungen geltende Zinssatz. 


In der Praxis sind insbesondere folgende drei Aufgabenstellungen von Interesse: 


1. Kapitalisierung einer Rente 
2. Verrentung eines Kapitals 
3. Annuitätentilgung eines Kapitals 


Bei gegebenem Zinssatz und gegebener Laufzeit lassen sich die Varianten der Rentenberechnung 

mit Hilfe der Rentenwertfaktoren durchführen. Für die Wertvarianten Barwert- oder Endwertrech- 
nung und den Zahlungsvarianten, vorschüssig oder nachschüssig, werden mit dem Programm folgende 
vier Rentenwertfaktoren berechnet: 


n 
= 
Nachschüssiger Rentenendwertfaktor an = = = (5.1.1) 
an 
Nachschüssiger Rentenbarwertfaktor Di, (5.1.2) 
q 
Vorschüssiger Rentenendwertfaktor an =qa, (5.1.3) 
Vorschüssiger Rentenbarwertfaktor b,=ab, (5.1.4) 


; REN 
q ist der Zinsfaktor (a =1+ 100 ) 


p ist der Nominalzinsfuß in Prozent (Zinssatz i= 


Tr) 
n ist die Laufzeit in Jahre DIE 


Die Varianten der Rentenberechnung werden mit verschiedenen Varianten der Finanzierungsbe- 
rechnung durch Aneinanderfügen der einzelnen Programmteile mit gemeinsam benutzten Unter- 
programmen physikalisch zu einem Programm in Tabelle 5.2.1 zusammengefaßt. 


5.1.1 Kapitalisierung einer Rente 
In dem Programmteil „‚Kapitalisierung einer Rente‘’ mit den Startadressen Label B, Label b, Label E 


und Label e werden die Barwerte für vorschüssige und nachschüssige Rentenzahlungen und die End- 
werte für beide Zahlungsziele nach folgenden Gleichungen errechnet: 


Barwert bei vorschüssiger Zahlung Ko = Rbı (5.1.5) 
Barwert bei nachschüssiger Zahlung Ko = Rb„ (5.1.6) 
Endwert bei vorschüssiger Zahlung K,,=Ra, (5.1.7) 
Endwert bei nachschüssiger Zahlung K„n = Ran (5.1.8) 
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Tabelle 5.2.1 Anweisungsliste „‚Renten- und Finanzierungsprogramm 


Annuität_ ei »#Löia 857 x 113 .RCLI 163  RELC 
Pop BEE RLLE B5E  RCLD 14 * 178 EEX 

6632 6551 858 a 115 F2? ii 2 
das € 68  RELE li6 67102 ira * 
8665 RCLI Bei + ii? RCLB 173 1 
BBE x B62 REIS 118 A 174 + 
6er 5T05 BES x 113 a&iBL2. 175  5TO8 
868 FSESFA B65 RCLI 126 re] 176  RCLD 
BES FRTA-DAmuität BES RÜLZ 9. Tees AR, TE 
Bie STon BE x 1  RSDenguert 178 ST 
Bil RCELS B67 REL nachschüssig 123 &LBLe 175 A| 
dlz - 665 x Endwert 124 5FZ 156 - 
6l3 &K=8? 865 RCLD vorschüssig 125 &LBLE 161  RCLO 
id 6707 B76 Ä 126 655i 182 1 
815 1 671 = 127 F2? 183 - 
eleE KRCLO 872  RCLS 125 6T02 154 * 
Bir - 873 KE 125  RCLE 185 RTN 
BIS  RCLB 2 o »* 16 x 
819 x 875 REIS 13i__6T02 187  RCLD 
626  RCLA brE x nachschüssig 132 &LBiLc 185 5703 
82! = 77 ® Rente 133 SF2 153 6 
622 1 Bre F5ES$>elvorschüssig 134 &LBLC 158  STO4 
B27 + 678 ST0S5 135 6551 151 aLBL6 
B2# Ir 666 ABS 1356 RCLI 132 ‚\ 
b25 LH dEi EEX 137 € 133 $Tr+4 
B2E RCLE 882 CHS 136 FZ? 134 RCL4 
bZ7 IN 863 } 139 6703 135 DSF 
a2E 5 064 A&? 146  RCLO 136 PSE 
828 STD 685 6706 14i x 197 PRTX=DN 
83E  FRTA=-DLaufzeit 6565 REIS 142 »LBL3 136  DSP2 
631 »LEL7 667 5T+6 143 RCLB 1535  5T04 
632 RCLE 6656 RCLE 144 ker 266 STOD 
833 EEX 683 I 145 * z61 65Bi 
634 2 836 ai 146 R-S=DR 262  RCLA 
835 * 651 EEX 147 RCLD 263 x 
836  RCLB 832 2 148 x 264 CHS 
637 x 633 x 145 PRTÄ=DIR 265 RÜLI 
838 FSE=-DKı 894 RrS=> Poff 156  RCLB 266 RCLB 
6398 ST09 655 xLBL9 151 Aer 287 x 
d46 ö 0695  RCLE 152 ACH R 268 + 
e4i 5705 857 $TÜl 153 R-SD% 283 PRTX=DK; 
642 xLBL6 688 RCLD 2i6 82 | 
643 KRCLS 895 T* 155 6551 2il 6T06 
644 ST+r6ö 186  STO2 156 RCLB 212  RCLA 
645 6559 i6i 5703 Kapital 157 RCLI 213 RÜL4 
645 RELA 182 RCLB p 158 x BR 
647 RCLZ 183 * 159  STOE 215 + 
6486 RLÜLI 164 5STO4 168 R/S=D>Kn Zi6  PRTIA=D Rg 
645 x 185 1 abgezinstes i61 ıLBLd 217 RÜCLB 
656  RCLS 166 ST-i 162 65861 218 ker 
851 = 187° :5T-3 163  RCLB 219 %CH 
652 R{LS 168 RTN le4  RCLI 226 RCL3 
853 x nachschüssig 189 &LBLb 165 * 221 STOD 
654 = Barwert 118 $F2 ls& S5TOA 222 R+ 
655 RELI |vorschüssig 411 LBLB 167 R/5=DK, 223 R-S=TD% 


056  RELS 112 6SBi UP 165 sLBLi 


Vor dem Programmstart müssen die Werte für die Rente als DM-Betrag in STO A, für den Zinsfuß 
als Prozentwert in STO C und für die Laufzeit als Anzahl der Jahre in STO A eingegeben werden. 
Bei Programmstart mit Großbuchstaben wird der Rentenbarwert bzw. der Rentenendwert für vor- 
schüssige Rentenzahlungen, d.h. am jeweiligen Jahresanfang, berechnet. Bei Programmstart mit den 
entsprechenden Kleinbuchstaben werden die entsprechenden Werte für nachschüssige Rentenzah- 
lungen, d.h. am jeweiligen Jahresende, berechnet. 


5.1.2 Verrentung eines Kapitals 


In dem Programmteil ‚„‚Rente aus Kapital’ mit den Startadressen Label C und Label c werden die 
aus dem Barwert eines Kapitals zahlbaren vorschüssigen oder nachschüssigen Renten nach folgen- 
den Gleichungen errechnet: 


Vorschüssig zu zahlende Rente R=— (5.1.9) 


Nachschüssig zu zahlende Rente R= (5.1.10) 
Vor dem Programmstart müssen die Werte für das finanzmathematisch wertgleich in Rente umzu- 
wandelnde Kapital als DM-Betrag in STO B, für den Zinsfuß als Prozentwert in STO C und für die 
Laufzeit der Rente in STO A eingegeben werden. 

Der Programmstart mit dem Großbuchstaben C liefert als Ergebnis die vorschüssig zu zahlende 
Rente als DM-Betrag, während der Start über f, c die nachschüssig zu zahlende Rente ergibt. 


5.2 Finanzierungsberechnung 


Finanzierungsberechnungen beinhalten eine exponentielle Verknüpfung der drei Variablen Kapital, 
Zinsfuß und Laufzeit. Infolge der exponentiellen Wirkung der Laufzeit liegen immer Gleichungen 
höheren Grades vor, die je nach Wahl der Unbekannten zu logarithmischen oder iterativen Lösun- 
gen führen. Daher ist für diese Art Aufgabenstellungen eine programmierte Behandlung besonders 
nutzbringend anzuwenden. Insbesondere der Rückgriff auf Zinsfaktortabellen ist dann nicht mehr 
erforderlich. 


5.2.1 Annuitätentilgung 


Unter dem Begriff Annuitätentilgung versteht man die Tilgung einer Kapitalschuld mit gleichblei- 
benden jährlichen Rückzahlungsraten. Die Annuität umfaßt sowohl den Zinsanteil für das vergangene 
Jahr wie auch einen Tilgungsanteil. Der Zinsanteil nimmt fortlaufend ab, während der Tilgungsanteil 
entsprechend zunimmt. 

In dem Programmteil „Annuitätentilgung”‘ wird zunächst über die Startadresse Label A für eine 
Annuitätentilgung mit jährlich aktivierter Annuitätenzahlung die erforderliche Annuität aus dem 
Kapital-Nennbetrag und dem nachschüssigen Rentenbarwertfaktor berechnet: 


(5:2:1) 


72 


5.2.2 Effektivverzinsung bei Disagio 


Auf dem Kapitalmarkt werden Hypotheken meist nicht mit ihrem Nennbetrag ausgegeben, sondern 
vermindert um einen Abschlag, dem Disagio. Der Auszahlungsbetrag K; ist daher gleich der Diffe- 
renz aus dem Kapital-Nennbetrag Ko und dem Disagio D: 


K} = Ko Da D (5.2.2) 


Das Disagio errechnet sich aus dem Auszahlungskurs d in Prozent und dem Kapital-Nennbetrag: 


d 
D=- ( er )Ko (5.2.3) 


Da aber die Annuität auf den Kapital-Nennbetrag und auf festgesetzte Laufzeit bezogen ist, ergibt 
sich eine gegenüber dem vereinbarten Zinsfuß höhere Effektivverzinsung ge: 


GI 
n 


Ge” 


1 
A-Kıge m, =0 (5.2.4) 


Da die Gl. (5.2.4) nicht geschlossen lösbar ist, wird als iterativer Lösungsalgorithmus die Newton- 
sche Iterationsregel angewandt: 


f(q,) 
=. 5.2.5 
An+1 In f(q,) ( ) 
Mit 
%q-1) 
FE OL (5.2.6) 
ga" 1 
’ tar 1a Fnlg> Dar ang" lg-1) 
a ee ET (5.2.7) 


(q’- 1)? 


Die Iteration wird beendet, wenn die Differenz der beiden letzten Zinsfaktoren die gesetzte 
Schranke e = 10°° unterschreitet: 


ge (5.2.8) 


In dem Programm wird als Startwert für die Iteration der vereinbarte Zinsfuß gesetzt. Damit ist die 
Genauigkeitsbedingung gemäß GI. (5.2.8) für übliche Verhältnisse nach etwa fünf Iterationszyklen 
erreicht. 

Nach Eingabe der Werte für den Kapital-Nennbetrag in STO A, den Nominalzinsfuß in STO C, die 
Laufzeit in STO D und den Auszahlungskurs in STO E kann das Programm durch Betätigung der 
Label-Taste A gestartet werden. Danach wird zunächst die Annuität berechnet, in einer Pause ange- 
zeigt und ausgedruckt. Anschließend werden der Auszahlungsbetrag und nach jedem Iterationszyk- 
lus der Quotient für die Wurzelverbesserung aus Gl. (5.2.5) in kurzen Pausen angezeigt. Die Pro- 
grammbearbeitung wird schließlich mit dem errechneten effektiven Zinsfuß angegeben in Prozent 
beendet. 
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5.2.3 Tilgungsplan 


Über die Startadresse Label a kann der Programmteil „Tilgungsplan‘' aufgerufen werden. Um in 
diesem Programmteil auch beliebige Anfangszeiten für den Tilgungsplan setzen zu können, wurde 
auf einen sukzessiven Rechnungsaufbau verzichtet und trotz der um einige Sekunden längeren 
Rechenzeit für jeden Zyklus der aktuelle Kontostand S„ geschlossen berechnet: 


er 
gl 


S,=Koq’-A (5.2.9) 
Als Ergebnisse werden das jeweilige Jahr und der zugehörige aktuelle Kontostand zyklisch ausge- 
geben. Zum Abschluß der Rechnung werden der gesamte Rückzahlungsbetrag in DM sowie das 
Aufgeld in Prozent berechnet und ausgegeben. 


5.2.4 Auf- und abgezinstes Kapital 


In dem Programmteil ‚‚Auf- und abgezinstes Kapital’ mit den Startadressen Label D und Label d 
werden der Endwert bzw. der Anfangswert eines Kapitals bei gegebener Laufzeit und gegebenem 
Zinssatz bestimmt: 


Kn = Koq" (5.2.10) 


Ras (5.2.11) 


5.2.5 Programmbeschreibung ‚‚Renten- und Finanzierungsprogramm‘”' 


Der Programmteil zur Berechnung der Annuität und der Effektivverzinsung umfaßt die Programm- 
zeilen 001 bis 094 mit den Unterprogrammen Label 1 von Zeile 168 bis 185 und Label 9 von Zeile 
095 bis 108. In dem Unterprogramm Label 1 wird der nachschüssige Rentenendwertfaktor a, nach 
GI. (5.1.1) berechnet und im X-Register an das rufende Programm übergeben. Außerdem wird der 
Zinsfaktor q gebildet und nach STO O abgespeichert. Mit den Anweisungen 004 bis 006 wird die 
Annuität gemäß Gl. (5.2.1) berechnet, nach STO 5 abgespeichert und in einer Pause angezeigt. Der 
Wert für die Annuität kann an dieser Stelle durch Eintasten eines neuen Wertes verändert werden. 
Falls dies erfolgt, muß eine neue Laufzeit errechnet werden. Hierzu ist die Abfrage x = O in Zeile 
012 vorgesehen. Die gegebenenfalls errechnete neue Laufzeit wird in Zeile 030 ausgegeben. Ab 
Label 7 in Zeile 031 wird der um das Disagio verminderte Kapitalwert K, gemäß GI. (5.2.2) mit 
einer kurzen Pause angezeigt. Ab Zeile 042 beginnt mit Label 8 die Schleife für die Newton- 
Iteration. 

Der jeweils verbesserte Lösungswert für den Zinsfaktor q nach GI. (5.2.5) wird durch die Register- 
arithmetik-Anweisung in Zeile 044 gebildet. Mit den folgenden Anweisungen bis zur Zeile 077 wer- 
den die Gin. (5.2.6 und 5.2.7) ausgewertet. Der ermittelte Wert für die Wurzelverbesserung wird in 
einer kurzen Pause angezeigt und anschließend mit e = 10° in Zeile 084 verglichen. Ist die Ge- 
nauigkeit noch nicht erreicht, erfolgt ein Rücksprung nach Label 8, so daß ein weiterer Iterations- 
schritt durchlaufen wird. 

Zur Abkürzung des Iterationsverfahrens kann in der kurzen Pause über die Tastatur Null eingegeben 
werden. 
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Als Ergebnis der Iteration wird am Programmende in Zeile 094 der effektive Zinsfuß angezeigt. 

Die Barwertberechnung erfolgt in dem Programmteil mit den Zeilen 109 bis 122. Als Merkmal für 
die nachschüssigen Rentenzahlungen wird das Flag 2 in Zeile 110 gesetzt und in Zeile 115 abge- 
fragt. Der nachschüssige Rentenendwertfaktor a, nach Gl. (5.1.1) wird in dem Unterprogramm 
Label 1 berechnet. Als Ergebnis wird der nach den Gin. (5.1.5 und 5.1.6) errechnete Barwert am 
Programmende in Zeile 122 angezeigt. 

Programmtechnisch verknüpft mit der Barwertberechnung ist die Endwertberechnung gemäß Gin. 
(5.1.7 und 5.1.8) in den Zeilen 123 bis 131. Die Ergebnisse werden ebenfalls in Zeile 122 angezeigt. 
Der Programmteil für die Verrentung eines Kapitals erstreckt sich von Zeile 132 bis 146. Auch hier 
wird als Merkmal für die nachschüssige Zahlungsweise wieder das Flag 2 in Zeile 133 gesetzt. Bei 
der Flag-2-Abfrage in Zeile 138 liegt der nachschüssige Rentenbarwertfaktor b„ im X-Register vor. 
Die gemäß den Gin. (5.1.9 und 5.1.10) zu zahlende Rente wird mit dem Programmstop in Zeile 
146 angezeigt. Nach Betätigung der R/S-Taste wird zusätzlich in den Zeilen 147 bis 153 die Summe 
der Rentenzahlungen und das Aufgeld in Prozent vom zu verrentenden Kapitalbetrag ausgegeben. 
In dem Programmteil zur Berechnung eines auf- bzw. abgezinsten Kapitals werden die GIn. (5.2.10 
und 5.2.11) ausgewertet. Das berechnete aufgezinste Kapital wird in STO E abgespeichert und am 
Programmende in Zeile 160 angezeigt. Das abgezinste Kapital wird in STO A abgespeichert und am 
Programmende in Zeile 167 angezeigt. 

Der Programmteil zur Berechnung eines Tilgungsplanes erstreckt sich von Zeile 186 bis zum physi- 
kalischen Programmende in Zeile 223. 

In einer Programmschleife von Zeile 191 bis 211 werden das jeweilige Jahr und der aktuelle Konto- 
stand ausgegeben. Zur Abkürzung der Rechnung kann in der Programmpause in Zeile 196 ein ver- 
änderter Jahreswert eingegeben werden. Sobald der Kontostand einen negativen Wert aufweist, wird 
diese Programmschleife verlassen und die gesamte Rückzahlsumme sowie das prozentuale Aufgeld 
ausgegeben. 


5.2.6 Anwendungsbeispiele 


1% Zu einem Kapital-Nennbetrag von 100 000,— DM mit 96 % Auszahlung soll bei einem Zins- 
fuß von 6 % und 10-jähriger Laufzeit die Annuität und der effektive Zinsfuß bestimmt wer- 
den. 

Über die Tilgungszeit ist ein Tilgungsplan zu erstellen. 


Eingaben: 100000 STOB (Kapital) 
6 STOC (Zinsfuß) 
10 STOD (Laufzeit) 
96 STOE (Auszahlungskurs) 


Start [Al: Annuität, effektiver Zinsfuß 


Ergebnisse: 1. Annuität A = 13 586,80 DM 
2. Auszahlungsbetrag Kı = 96 000,00 DM 
3. Effektiver Zinsfuß 


0,01 
Iterationsanzeigen -8,54 ... 10°° 
-78..10° 
Endergebnis: Petr = 6,87 % 


Rechenzeit rund 25 Sekunden. 
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Start_ f | a]; Tilgungsplan 
Ergebnisse: Jahr Kontostand 
1. 92 413,20 DM 
84 371,20 DM 
75 846,68 DM 
66 810,68 DM 
57 232,53 DM 
47 079,68 DM 
36 317,67 DM 
24 909,93 DM 
12 817,73 DM 
0,00 DM Gesamte Rückzahlungssumme: 135 867,96 DM 
Aufgeld: 35,87 % 


ORION BSD 


—_ 


Rechenzeit rund 60 Sekunden. 
Für eine Jahresrente von 12 000,— DM soll der Barwert für vorschüssige und nachschüssige 
Rentenzahlungen bestimmt werden. Die Laufzeit der Rente wurde auf 10 Jahre bei einem 
Zinsfuß von 6,5 % kalkuliert. 
Eingaben: 12000 STOA (Rente) 
65 STOC (ZinsfuRß) 
10 STOD (Laufzeit) 
Start [8]: Rentenbarwert der vorschüssig fälligen Rente 91 873,25 DM 
Start [p]: Rentenbarwert der nachschüssig fälligen Rente 86 265,96 DM 
Rechenzeit rund 3 Sekunden. 
Für die vorstehenden Eingabedaten sind die Endwerte bei vorschüssiger und nachschüssiger 
Zahlungsweise zu bestimmen: 
Start [e]: Rentenendwert der vorschüssig fälligen Rente 172 458,72 DM 
Start [e]: Rentenendwert der nachschüssig fälligen Rente 161 933,07 DM 
Rechenzeit rund 3 Sekunden. 
Ein Kapitel von 300 000,— DM soll in eine Rente verwandelt werden. Der Zinsfuß sei 5 % 
und die Laufzeit mit 20 Jahre kalkuliert. 
Eingaben: 300000 STOB (Kapital) 
5 STOC (Zinsfuß) 
20 STOD (Laufzeit) 
Start [e]: Die vorschüssig fällige Rente beträgt 22 926,45 DM/Jahr 
Start c : Die nachschüssig fällige Rente beträgt 24 072,78 DM/Jahr 
Rechenzeit rund 3 Sekunden. 
Für eine Bareinlage von 1,— DM über eine Laufzeit von 1979 Jahre und 3 % Verzinsung ist 
der aufgezinste Kapitalendbetrag zu bestimmen: 


Eingaben: 1 STOB (Kapital) 
3 STOC (Zinsfuß) 
1979 STOD (Laufzeit) 
Start [D]: Der Endwert beträgt 2,540198712 10°5 DM 
Rechenzeit rund 3 Sekunden. 


6. Zu einem in 30 Jahren fälligen Kapitalbetrag von 100 000,— DM ist der heutige Barwert bei 
einem Zinsfuß von 9 % zu bestimmen: 


Eingaben: 100000 STOB (Kapital) 


9 STOC (Zinsfuß) 
30 STOD (Laufzeit) 


Start [a]: Der Barwert beträgt 7 537,11 DM 


Rechenzeit rund 3 Sekunden. 


5.3 Zinseszinsberechnungen für Jahres- und Monatszyklen 


Die vier Grundaufgaben der Zinseszinsrechnung Tilgungsplan-, Laufzeit-, Annuitäts- und Endwert- 
berechnungen können in einem Programm wahlweise für jährliche und monatliche Zahlungs- und 
Verzinsungsintervalle zusammenhängend gelöst werden. Bei der jeweiligen Zyklusrechnung berech- 
net sich der Zinsfaktor q: 


p Due 
1* 100 jährliche Zyklen 
q= (5.3.1) 
p . 
+ 1200 monatliche Zyklen 


Die jährlichen Zyklusrechnungen werden in dem Programm nach Tabelle 5.3.1 über die Großbuch- 
staben A,B,C,D gestartet und das Flag O als Merkmal gesetzt. Für die monatlichen Zyklusrech- 
nungen gelten die entsprechenden Kleinbuchstaben a bis d als Startadressen bei gelöschtem Flag 0. 


5.3.1 Tilgungsplan 
Die Tilgungsplanberechnung kann über die Startadressen Label A in Programmzeile 004 für jähr- 


liche und Label a in Zeile 001 für monatlich nachschüssige Zahlungen aufgerufen werden. Für die 
Berechnung gemäß GI. (5.2.9) müssen folgende Eingabewerte vorliegen: 


Rückzahlrate (Annuität) als DM-Betrag in STOA 
Kapital als DM-Betrag in STOB 
Zinsfuß als Prozentwert in sToc 


Startzeit für den Tilgungsplan bzw. „Jahre, Monate‘ STO D 


Die Gl. (5.3.1) wird in dem Unterprogramm Label 3 von Zeile 056 bis 088 ausgewertet. 

In dem Unterprogramm Label 4 von Zeile 089 bis 104 wird die besondere Anzeige für die Monats- 
zyklen-Rechnung erzeugt. Mit Hilfe der Funktionen INT und FRAC wird aus der in STO 2 abge- 
speicherten Anzahl Monate der Anteil voller Jahre und Monate gebildet und diese beiden Werte in 
Form einer Dezimalzahl zusammengefügt und durch eine kurze Pause in Zeile 035 angezeigt. An- 
schließend wird der aktuelle Kontostand in einer kurzen Pause angezeigt. Sobald der Kontostand 
kleiner oder gleich Null geworden ist, wird die Schleife verlassen und der gesamte Rückzahlungs- 
betrag in DM sowie das Aufgeld in Prozent vom Nennbetrag errechnet und ausgegeben. 


Für die Umrechnung von n Jahre (n Dezimal) in p,q Jahre, Monate gilt: 


p,q = Int{n} + 0,12 Frac {n} (5.3.2) 
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Tabelle 5.3.1 Anweisungsliste „‚Zinseszinsberechnung für Jahres- und Monatszyklen’ 


UP 6856 #LBL3 111 6SB3  jEndwert —I66 6TOB 
657 RLLC 112 ı jährlich | 167_sLBiD 
858 1 113  REL6 166 SF8 
055 F8? 114 - 169 xLBL8 
668 6105 115  RCLB 178 SF2 
861 R+ 116 x 171 6583 
862 1 117 RELA 72 6T08->0) 

863 2 118 ® @>173 sLBL2 
664 &LBL5 119 1 174 PSE 

665 EEK 128 + 175 PRTS=Dnachsch. 

66 2 121 18 176 REG nun 

867 x 122 LH 177 x SEMER 

668 * 123  RCLE 178 PRTX=D vorsch. 
863 1 124 LK 1795 RS 
878 + 125 * 186 #LBLe 
e7i  STOB 126  ST02 181 CF6 
72 RCLD 127° FB? i 182 6708 
073 FB? 125 6707 |jährli 183 _ *LBLE 
674 6T06 129 PSE 184 SF 
675 FRC 138  FRTX=>Monate 185 #LBL8 
B7& . 131 6554 186 1 
622 - 877 1 132 #LBL7 167 RCLC 
623 # 678 2 133 PRTX=DJahre 1885 EEX 
624 RCLA 673 * 183 2 
625 x 666 RÜLD monatlich 135 198 ® 
b26  F2? 681 INT |Annuität 136 191 STO4 
627 6102-49) 882 + jährlich [—137 192 + 
625 - 683 1 138 193  ST03 
623 RLLZ 664 2 139 SF6 194 i 
636  DSFa 865 x 146 »LBL8 195 FB? 
831 F6? 886 ALBLE 141 6853 156 6709 
632 6709 687 5ST02 142 RCLB 197 RÜL4 
. 65B4 685 __RIN 143 1 138 6 
034 xLBL9 UP 669 aLBLd 144 - 199 r 
635  FSE=DZeit 636 1 145 RCLB 266 5 
636  DSP2 631 2 145 RÜL2 261 x 
637 xer 852 5 147 yx 262 1 
038 _ PSE=DKonto- 853 ENT? 148 x 283 2 
6393  x&>8? | stand 654 INT 145 LSTK 264 + 
646 6701 035 Kr 158 1 265 xLBL3 
641 RÜL2 036 FRE 151 - 266 RCLA 
042 RCLA 657 2 152 & 287 x 
643 x 698 1 153 EEX 208  STO4 
844 + 833 2 154 2 269 RCL3 
045  STOE 186 x DI Hay 216 RCLD 
046  PRTX=DRückzahl- 16: + 156 x 2ii Yx 
647 RCLB | summe 162 STOD 157° PSED% 212 1 
048 Kar 163  DSPZ 158 LSTK 213  5T-3 
649 %CH 164 RTN 155  RCLB 214 - 
058 PRTX=DA[monatlich 185 166 x 215  RÜL3 
651 RS it 186 161 STOR 2i6 B 
652 »LBLi jä 187 162 PRT=D>Annität 217 x 

053 1 168 163__R,S 218  PRTÄ=DEndwert 
054 ST+2 168 SF& [monatlich 164 &#LBld 218 RS 


0855  6T08 116 «LBL8 Endwert 165 CFö 
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Entsprechend gilt für die Umkehrung: 


zeatp.a) (5.3.3) 


n=Int{p,qa} + 0,12 


5.3.2 Laufzeit 


Die Laufzeit einer Kapitalschuld Ko errechnet sich bei gleichbleibenden Rückzahlraten A aus 
GI. (5.2.9) 


In Lena 
A-Kolq-1) 
ne Be A (5.3.4) 
Inq 


Diese Gleichung wird in dem Programmteil mit der Startadresse Label B in Zeile 108 für jährliche 


bzw. Label 6 in Zeile 105 für monatliche Zahlungsraten ausgewertet. Die erforderlichen Eingabe- 
werte hierfür sind: 


Rückzahlrate (Annuität) als DM-Betragin STOA 
Kapital als DM-Betrag in sToB 
Zinsfuß als Prozentwert in sToC 


Als Ergebnis werden bei der Jahreszyklenrechnung die Laufzeit in Jahre als Dezimalzahl und bei 
der Monatszyklenrechnung die Laufzeit in Monate als Dezimalzahl und als „Jahre, Monate‘ aus- 
gegeben. 


5.3.3 Annuität 


Die Annuität zur Tilgung einer Kapitalschuld in einer vorgegebenen Laufzeit errechnet sich nach 
GI. (5.2.1). Hierzu dient der Programmteil mit den Startadressen Label C in Zeile 136 und Label c 
in Zeile 135. Die erforderlichen Eingabewerte hierfür sind: 

Kapital als DM-Betrag in sToB 

Zinsfuß als Prozentwert in sTocC 

Laufzeit in Jahre bzw. ‚Jahre, Monate‘ in STOD 


Als Ergebnis wird die Annuität als Prozentwert und als DM-Betrag ausgegeben. 


5.3.4 Endwert gleichmäßiger Zahlungen 


Mit den Startadressen Label D in Zeile 167 bzw. Label d in Zeile 164 werden die Endwerte gleich- 
mäßiger Zahlungen gemäß den Gin. (5.1.7 und 5.1.8) berechnet. 
Die erforderlichen Eingabewerte hierfür sind: 

Zahlungsbetrag in DM in sSTOA 

Zinsfuß als Prozentwert in sSTOC 

Laufzeit in Jahre bzw. ‚Jahre, Monate‘ in STO D 


Als Ergebnisse werden die Endwerte für nachschüssige und vorschüssige Zahlungen ausgegeben. 
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5.3.5 Sparkassenverzinsung 


Bei gleichmäßigen monatlichen Zahlungen auf Sparkonten erfolgt die Zinsgutschrift im allgemeinen 
nicht monatlich, sondern einmal im Jahr. Für die innerhalb des Jahres geleisteten Zahlungen ist dann 
nur eine einfache Verzinsung und keine Zinseszinsen in Rechnung zu stellen. 


Bei zwölf gleichen monatlichen Zahlungen R jeweils zum Monatsanfang ergibt sich zum Jahresende 
ein Zuwachs von: 


# p 

Z=12R+(12+11+10+..+2+1)R oo0 (5.3.5) 
i ei 

zZ (12 +6,5 100 R (5.3.6) 


Dieser Zuwachs geht als nachschüssige Jahreszahlung in die Gl. (5.1.8) für den Endwert K, ein: 


p das 
= ES —— 
Kn (12 6,5 a) Fee (5.3.7) 
Der Programmteil für die Berechnung des Endwertes bei monatlicher Zahlung und Sparkassenver- 
zinsung wird über die Startadresse Label e in Zeile 180 erreicht. 

Hierzu sind folgende Eingaben erforderlich: 


Zahlungsbetrag in DM in STOA 

Zinsfuß als Prozentwerte in STOC 

Laufzeit in Jahre, Monate in STOD 
Als Ergebnis wird der Endwert als DM-Betrag ausgegeben. Bei Start über Label E wird der Endwert 
für nachschüssige Jahreszahlungen berechnet. 


5.3.6 Anwendungsbeispiele 


IE Ein Kapital von 100 000,— DM soll mit 12 000,— DM jährlich getilgt werden. Der Zinsfuß 
beträgt 6,5 %. Es ist ein Tilgungsplan über die gesamte Laufzeit zu erstellen. 
Eingabe: 12000 STO A (Tilgungsrate, Annuität) 
100000 STOB (Kapital) 
6,5 STOC (Zinsfuß) 


0 STOD (Startzeit) 
Start la]: für Tilgungsplan mit jährlichen Rückzahlungen 
Zeit Kontostand 


100 000,— DM 


Ergebnisse: 


1 94 500,— DM 

2 88 642,60 DM 

3 82 404,26 DM 
Anzeigen mit a 
kurzer Pause ; 

10 25 780,68 DM 

11 15 456,42 DM 

12 4 461,09 DM 

13 — 7 248,94 DM 
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Lange Pause bzw. Ausdruck: 148 751,06 DM Rückzahlsumme 
Lange Pause bzw. Ausdruck: 48,75% Aufgeld 


Für einen Jahreszyklus werden rund 5 Sekunden Rechenzeit benötigt. 
Start [8]: Laufzeit 

Nach rund 5 Sekunden wird die Laufzeit mit 12,39 Jahre ausgegeben. 
Für eine Laufzeit von 25 Jahren soll die Annuität berechnet werden. 


Eingabe: 25 STOD 
Start [e]: Annuität 
Ergebnisse: In einer kurzen Pause werden die Annuität mit 8,20 % und anschließend der 


Betrag von 8 198,15 DM ausgegeben. 
Für eine jährliche Zahlung von 6 000,— DM soll der Endwert nach 10 Jahren bei einem Zins- 
fuß von 7,5 % für nachschüssige und vorschüssige Zahlungsvereinbarungen berechnet werden. 


Eingabe: 6000 STOA (Kapital) 
75 STOC (Zinsfuß) 
10 STOD (Laufzeit) 


Start [D] ; für Endwertberechnungen 
Ergebnisse: 1. Anzeige bzw. Ausdruck: 
84 882,52 DM bei nachschüssiger Zahlung 
2. Anzeige bzw. Ausdruck 
91 248,71 DM bei vorschüssiger Zahlung 
Die vorstehende Endwertrechnung soll für monatliche Einzahlungen von 500,— DM bei 
Sparkassenverzinsung durchgeführt werden. 


Eingabe: 500 STOA (Rate) 


75 STOC (Zinsfuß) 
10 STOD (Laufzeit) 


Start [le]: für Sparkassenverzinsung 


Ergebnis: 88 330,88 DM 

Rechenzeit rund 5 Sekunden. 

Ein Kapital von 100 000,— DM soll mit 1 000,— DM monatlich getilgt werden. Der Zinsfuß 
betrage 6,5 %. Es ist ein Tilgungsplan ab dem zehnten Jahr zu erstellen. 


Eingabe: 1000 STOA (Tilgungsrate) 
100 000 STOB (Kapital) 
65 STOC (ZinsfuR) 
10 STOD (Laufzeit) 


Start [a]: für Tilgungsplan mit monatlicher Rückzahlung 
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Ergebnisse: Jahr/Monat | Kontostand 

10:00 22 815,22 DM 

10:01 21 938,81 DM 

10:02 21 057,64 DM 

10-11 12 909,24 DM 

11-00 11 979,17 DM 

11:01 11 044,06 DM 
Anzeigen mit - ’ 
kurze Pause - - 

11:08 4 354,89 DM 

11:09 3 378,48 DM 

110 2 396,78 DM 

1171 1409,77 DM 

12:00 417,40 DM 

12:01 — 580,34 DM 
Lange Pause bzw. Ausdruck: 144 419,66 DM Rückzahlsumme 
Lange Pause bzw. Ausdruck: 44,42% Aufgeld 


7 Die monatliche Einzahlung von 1000,— DM bei 6,5 % Verzinsung über 12 Jahre, 1 Monat 
würde eine Endsumme von 216 043,99 DM ergeben (Start [el mit Ergebnisanzeige 
nach rund 5 Sekunden). 


5.4 Wirtschaftlichkeitsberechnung von Investitionen 


Zur Beurteilung der Wirtschaftlichkeit von Investitionen sind die drei klassischen Verfahren der 
dynamischen Wirtschaftlichkeitsberechnung: Kapitalwertmethode, Interne Zinsfußmethode und 
Annuitätenmethode von besonderer Bedeutung [18, 19, 20]. 

Die manuelle Berechnung stützt sich wegen der auftretenden Exponentialfunktionen auf Tabellen- 
werke für die Aufzinsungs-, Abzinsungs-, Diskont- und Wiedergewinnungsfaktoren. Die Handhabung 
solcher Tabellenwerke führt in der Praxis häufig zu einer kochrezeptmäßig schematisierten Berech- 
nung ohne erkennbaren Bezug auf die zugrundeliegenden klar formulierten mathematischen Be- 
ziehungen. Die Kommunikation über die abgegrenzten Aufgabenbereiche verschiedener Disziplinen 
hinweg wird dadurch sichtlich erschwert. 

Mit dem in Tabelle 5.4.1 angegebenen Programm sind die einzelnen Berechnungsmethoden von 
ihrem Ballast befreit und auf den mathematischen Kern reduziert. Die Rechenergebnisse liegen für 
beliebige Varianten praktisch ohne Zeitverzug mit den formulierten Eingabedaten in hoher Genauig- 
keit vor. 


5.4.1 Berechnungsverfahren 


Zunächst werden die finanzmathematischen Grundlagen für die drei Berechnungsverfahren zusam- 
menhängend dargelegt. 
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Tabelle 5.4.1 Anweisungsliste ‚Wirtschaftlichkeitsberechnung I” 


Annuifüt 861 #LELa 057  RCLD 168 xLBLD 
002 6556 858 1 114 25 165 F 
683  STOE 855 + 115 6553 178 FSE=DE 
Bö4e F35 066 STOD 16 8 171  $T05 
665 Te 661  DSPB 117 $705 ITE ABS 
686 |-6T0d 662 PSE=D>Jahre 118 &LBL5 173 EEX 

Annuität | 867 #LBLA 663  DSPZ 113  RCLS 174 HS 
BE GSBLC 664 25 126  ST-6 75 4 
885 STOE 665 | F8? 121  65B4 176 RIN 
ia FiS 666 | 65B7 122  RCLI 177 xLBL3 
611 |xLBLd Ber [) 123  RCL3 178  RELC 
612 | RCLE 865 | ST05 124 E 173 x#8? 
613 | PSE=D>Kapital- 869 |xLBLI- 125  RÜL2 186 6TO8 
ei4 | RCLI wert 6878 | RCL5 126 x [.& 3 
615 | RCL3 671 | ST-6 127 RCLA 182 #LBL6 
eis : 672 1 128 x 183  STOC 
617 | STO5 673 6 123  RCLB 184 6557 
618 | RCL2 674 | STOI 138 - 1655 __RTN 
615 x 675 1 131 RELI 
626 | 5T08 875 | STOE 132° RCL4 Item P3S 
621 x 677 0) 133 x 185 | 6587 
822 | STOI e78 | 5T07 134  RCLD 183 | 6554 
623 | PRTX=>Annuität 879 | STO8 135 x 136 | RCL3 
024 | RCLE 666 | 65B6 136  RÜLZ2 151 | RCLi 
625 | RCLH 881 | RcLA 137 + 152 = 
625 | 5745 882 | RCL7? 138  RCL3 193 | RCL2 
627 | RCLB 663 | F6? 133 x 194 # 
625 x 684 | STO8— 146  RELI 195 | RCLB 
625 | STOE 685 - 1di  REL2 196 x 
038 | RCL5 686 | RCLB 142 x (&—197 |\xLBL8 
631 Re 087 | 655BD 143 RCL4 198 | RCLA 
632 de PS 868 | %£r? 2 144 x 195 - 
633__RrS=>Kapital- 885 | 6709 145  RCLD 286 | STOE 

dienst 898 | 6Te 146 x 261 Ss 
08355  SF® 651 |xLBL6 147 - 262 RTN=DKapital- 
836 ___6T08 632 | RCLi 148 RCL3I 263 sLEL4 wert 

TZinsfun | 837_ #LBLb 693 | ISZI 149 x? 264  RCL6E 
635  CF6 894 | RCLE 158 + 265 ST0I 
635 25 895 | RCLE 151 RCLA 266 RCLD 
646 I 65B3 636 x 152 x 267 Y* 
Bdie FiS 897 | STOE 153  6SBD 268 STO2 
642 »LBLB 898 3 154 Kr? 2693 5T03 
643 3 693 | ST+7 155 67105 216 RCLE 
644 STOI 188 | Rüie 156 #LBlLe 2ii * 
645  STOD 161 5 157 RCLS 212  STO4 
645 #LBLi 162 | RCLI 158 ST-6 213 1 
647° RiLi 163 1 159  RÜL6 214 ST-1 
648 #8? 164 0) 168 PS 215 8T-3 
643 6702 165 - 161 1 2i6  RIN 
656  RCLD 166 x 162 - 217 «LBL7 
65i 1 167 | ST+8 163 EEX 218 1 
652 - 188 | LSTK 164 2 219 RCLC 
653  STOD 185 | RCLD 165 x 228 % 
654 DSZI 118 | xr? 166  STOE 221 + 
655 6701 111 | 6706 167 R/S=DInterner 222 STO6 
056 &LBLZ 12a RIN Zinsfun 223° RTN 


224 R’S 


1. Kapitalwertmethode 


Der Kapitalwert K,, einer Investition ist die Differenz aus der Summe aller auf den Zeitpunkt to 
abgezinsten Bruttoerlösüberschüsse Üg(k) zu den Anschaffungskosten A, zum Zeitpunkt to: 


", UÜg(k) 
=) ob (5.4.1) 


ka 4 


Ku 


Der Zinsfaktor q in Gl. (5.4.1) errechnet sich aus dem kalkulatorischen Zinsfuß p in %: 


pP = 
100 % 


qa=1+ 1+i (5.4.2) 
Der Zinssatz i = p/100 % wird häufig auch als Einheitszinsfuß bezeichnet. 

Ein positiver Kapitalwert gibt an, um welchen Betrag eine Investitionsmaßnahme im Zeitpunkt to 
wertmäßig günstiger ist als die festverzinsliche Anlage des Investitionsbetrages über die Nutzungs- 
dauer der Investition T,, = n Jahre. 

Können für die Bruttoerlösüberschüsse über die Nutzungsdauer gleichbleibende Beträge Ü, ange- 
setzt werden, so gilt für den Kapitalwert: 


1 
Ku=Us ), x 
k=1 9 


—-Ao (5.4.3) 


Die Summe der Diskontierungsfaktoren 1/q* in Gl. (5.4.3) entspricht dem aus den Reihen der 
niederen Mathematik bekannten und in der Finanzmathematik gebräuchlichen Rentenbarwert- 
faktor b„ für die nachschüssig fällige Rente: 


ee ee (5.4.4) 


Setzt man GI. (5.4.4) in Gl. (5.4.3) ein, so folgt für den Kapitalwert K,,: 


Kuh ee, (5.4.5) 
w” Us gr q-ı 0 ‚4. 
Die Investitionsmaßnahme ist dann betriebswirtschaftlich vorteilhaft, wenn der Kapitalwert größer 

Null oder zumindest nicht negativ ist: 
Ku 20 (5.4.6) 


Setzt man die Anschaffungskosten gleich Null, so liefert die Gl. (5.4.5) mit K,, den Grenzkauf- 
preis, der gerade noch betriebswirtschaftlich vertretbar ist. Der Grenzkaufpreis ist also gleich dem 
Kapitalwert für verschwindende Anschaffungskosten. 


2. Interne Zinsfuß-Methode 


Der Interne Zinsfuß r einer Investition ist derjenige Zinsfuß, bei dem der in Gl. (5.4.1) angegebene 
Kapitalwert K,, der Investition gleich Null wird. Die Investitionsmaßnahme ist dann betriebswirt- 
schaftlich vorteilhaft, wenn der Interne Zinsfuß r größer oder zumindest gleich dem anzusetzenden 
Kalkulationszinsfuß p ist: 


r>p für K,„=0 (5.4.7) 
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Für Erlösintervalle k > 4 ergibt Gl. (5.4.1) unter der Nebenbedingung (5.4.7) eine Bestimmungs- 
gleichung vom Grad größer 4, für die keine geschlossenen Lösungsformeln existieren. Daher ist es 
zweckmäßig, in allen Fällen ein einheitliches iteratives Lösungsverfahren anzuwenden. Hierzu wird 
das Iterationsverfahren nach Newton für beliebige Erlösüberschüsse Üg(k) auf Gl. (5.4.1) ange- 
wandt: 


Alxn} (5.4.8) 
x EN NS 4. 
n+1 n f(x,) 
” Üg(k) 
aa De (5.4.9) 
k=ı 4 
Mit dem Startwert q, ergibt sich für den ersten Näherungswert q.: 
ee 
| U; (k) 
B 2 Gok 
Anendo: Tower (5.4.10) 
ı , Valk) 
k k+1 
x=ı 40 


Für den Fall der gleichbleibenden Bruttoerlösüberschüsse folgt mit Gl. (5.4.8) angewandt auf 
GI. (5.4.5): 


E [Aoadlao- 1) -Uglaa-N]tad -1) 
Ao {nad "(ao -1) +] lag -1)-nag "aulan -1)} 
rn = (1 = 1) 100% (5.4.12) 


= (5.4.11) 


Die Iteration wird beendet, wenn die Differenz der beiden letzten Zinsfaktoren eine vorgegebene 
Schranke e unterschreitet: 


44 44. SE (5.4.13) 


3. Annuitätenmethode 


Die Annuitätenmethode ist ebenso wie die Interne Zinsfußmethode eine abgewandelte Form der 
Kapitalwertmethode. Hier wird als Entscheidungskriterium auf den durchschnittlichen Jahresge- 
winn über die angesetzte Nutzungsdauer des Investitionsproduktes Bezug genommen. Von den 
wertmäßig gegebenenfalls unterschiedlichen Bruttoerlösüberschüssen wird gemäß GI. (3.4.1) durch 
Abzinsung auf den Investitionszeitpunkt der Kapitalwert bestimmt. Der über die Nutzungsdauer 
wieder verrentete Kapitalwert dient dann als Entscheidungskriterium für die Investition. Die In- 
vestitionsmaßnahme ist dann betriebswirtschaftlich gerechtfertigt, wenn der verrentete Kapitalwert , 
d.h. die Annuität größer Null oder zumindest nicht negativ ist. 

Mit Gl. (5.4.4) folgt für die Annuität: 


n 
= 
PER BR PR Li E00 (5.4.14) 
bn q” =] 
Der Kehrwert des Barwertfaktors b„ wird auch Wiedergewinnungsfaktor w, genannt: 
n 
Zi 
wm = En (5.4.15) 
eh 
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Ersetzt man in Gl. (5.4.14) den Kapitalwert K,, durch Gl. (5.4.5) so folgt als Entscheidungskrite- 
rium, daß die durchschnittlichen Bruttoerlösüberschüsse U, den Kapitaldienst Ko für die Investi- 
tion decken müssen: 


Üg >Aown = Ko (5.4.16) 


Am Ende der Nutzungsdauer T,, = n Jahre würde der verzinslich angelegte Kapitaldienst einen End- 
wert Aoq" erreicht haben. Der Kapitaldienst als das Produkt aus Anschaffungskosten und Wieder- 
gewinnungsfaktor deckt also am Ende der Abschreibungsperiode bei Außerachtlassung der Infla- 
tionsrate den Erneuerungsaufwand mit den Kosten A, sowie den entgangenen Zins- und Zinses- 
zinsertrag des über die Nutzungsdauer gebundenen Kapitals An. Zieht man vom Kapitaldienst Ko 
den Anteil zur Anlagenwerterhaltung ab, so verbleibt als Differenz der jährliche Zinsanteil 

Z = Ao p/100 % für das gebundene Kapital. 


Die Annuitätenmethode wird zweckmäßig zur Beurteilung der Wirtschaftlichkeit einer geplanten 
Ersatzinvestition gleicher Leistung angewandt. Hierbei sind als Entscheidungskriterium die durch- 
schnittlichen Erlösüberschüsse der alten Anlage den 
durchschnittlichen Erlösüberschüssen der neuen An- ö 

P i : Eingabe Eingabe 
lage vermindert um den Kapitaldienst der neuen ans Ayla lt..n)p,d 
Anlage gegenüber zu stellen: I: nn, u 


sn = AonWn = Dir (5.4.17) 


[8] 
Berechnung a 
Wiedergewinnungsfaktoren 
Bild 5.4.1 


Struktureller Aufbau des Programms „Wirtschaftlichkeitsberechnung‘ 


Annuität 
Kapitaldienst 


4. Vergleich und praktische Anwendung 


Alle drei vorgenannten Methoden sind im Kern gleich und machen zu verschiedenen Zeitpunkten 
anfallenden Kosten und Erlöse durch finanzmathematische Diskontierung auf denselben Zeitpunkt 
vergleichbar. Ein Mangel dieser Methoden ist die fehlende Relation zu der vorhandenen Risikospanne 
oder zu den gegebenen Bedingungen des Marktes hinsichtlich Angebots-, Preis- und Wettbewerbs- 
situation. 

In der Praxis haben sich folgende beiden Kriterien bewährt: 

(1) Für den begrenzten Zweck des reinen Kostenvergleichs von alternativ möglichen Investitionen 
mit gleicher Leistung und damit gleichen Erlösen (die eine z.B. mehr kapital-, die andere mehre 
lohnintensiv): 

Die Annuitätenmethode durch Auswertung der Gin. (5.4.14 bis 5.4.16). 

(2) Für den umfassenden Zweck des Wirtschaftlichkeitsvergleiches von Investitionen mit nach Zeit- 
punkt und Umfang unterschiedlichen Leistungen: 

Die Kapitalwertmethode durch Auswertung der Gl. (5.4.1), jedoch mit der Abwandlung, daß 
durch einfach proportionale Ermäßigung oder Erhöhung der Erlöse je Einheit der Kapitalwert 
K, zu Null wird (d.h. der kostendeckende Preis bestimmt wird). 

Der Unterschied zwischen den Marktpreisen und dem kostendeckenden Preis gibt dann einen 
signifikanten Maßstab, ob die Investition sich rechnerisch lohnt und — im Hinblick auf die 
Unwägbarkeiten — riskant werden kann. 
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5.4.2 Programmbeschreibung „Wirtschaftlichkeitsberechnung I” 


Die Anweisungsliste nach Tabelle 5.4.1 umfaßt sechs eigenständige, programmtechnisch ineinander 
geschachtelte Programme mit den Startadressen A, B, C für gleichbleibende Bruttoerlösüberschüsse 
und den Startadressen a, b, cc für beliebige Bruttoerlösüberschüsse. 


Start [a] 


Der Programmstart bei Label a führt zu Programmzeile 001 an den physikalischen Anfang des 
Programms. Die folgende Anweisung bewirkt einen Sprung in das Unterprogramm c auf Programm- 
zeile 034. Diese Einsprungadresse ist identisch mit der Startadresse für die Kapitalwertmethode. 
Dieses Unterprogramm endet in Programmzeile 202 mit einem Return und nicht mit R/S. Dies 

hat zur Folge, daß nach dem Unterprogrammaufruf über GSB c ein Rücksprung in das rufende 
Programm erfolgt, während nach einen Start bei Label c das Return in Programmzeile 202 auch 
das logische Programmende bedeutet. 

In dem Unterprogramm c wird bei Programmzeile 035 das Label O gesetzt und damit ein weiterer 
Unterprogrammaufruf bei Programmzeile 065 sowie eine Verzweigung bei Programmzeile 084 vor- 
bereitet. Durch den GTO-Befehl in Programmzeile 036 werden die Startadresse b und alle weiteren 
Anweisungen bis zu Programmzeile 042 übersprungen. In den Zeilen 043 bis 045 wird die indirekte 
Adressierung für den Abruf der Bruttoerlösüberschüsse aus den Speichern STO O bis STO 9 vorbe- 
reitet. Anschließend wird zwischen den Zeilen 046 bis 055 eine Programmschleife aufgebaut, um 
die Anzahl der eingegebenen Bruttoerlösüberschüsse festzustellen. Innerhalb der Schleife setzt die 
Dekrement-Anweisung das Indexregister nach jedem Umlauf um 1 zurück. Erreicht das Index- 
register den Wert Null, so wird das Programm bei Label 2 in Zeile 056 fortgesetzt. Die Anzahl der 
berücksichtigten Bruttoerlösüberschüsse wird schließlich in einer kurzen Pauseanweisung in Zeile 
062 angezeigt. 

Mit der Anweisung DSP2 in Zeile 063 wird die Anzahl der angezeigten Dezimalstellen wieder auf 2 
erhöht. Anschließend wird ein Austausch zwischen den Primär- und Sekundärregistern vorgenom- 
men. Als Kennzeichen, daß für den folgenden Programmbereich die Sekundärregister aktiv sind, 

ist in der Anweisungsliste eine durchgezogene Linie zwischen den Zeilennummern und den Anwei- 
sungen eingetragen. 

Die Flag-Abfrage in Zeile 065 führt bei positivem Ergebnis zu dem Unterprogramm mit der Ein- 
sprungadresse Label 7 in Zeile 217. In dem Unterprogramm wird die Anweisung q = 1+ {STO C}/ 
100 !) ausgeführt und der Zinsfaktor q in Speicher STO 6 abgelegt. Nach Null-Setzen von Speicher 
5 wird zwischen Zeile 069 und 084 der Teil einer Programmschleife für die Interne Zinsfußberech- 
nung mitbenutzt, bei der das Flag O nicht gesetzt ist. In Zeile 080 wird ein Unterprogramm mit der 
Einsprungadresse Label 6 aufgerufen. In dem Unterprogramm wird in Speicher 7 der Summenterm 
nach GI. (5.4.9) und in Speicher 8 der Summenterm für die erste Ableitung im Nenner von Gl. 
(5.4.10) gebildet. Nach dem Rücksprung ins rufende Programm ergibt die positive Flag-O-Abfrage 
in Zeile 083 einen Sprung zu Label 8. Mit den Anweisungen 198 bis 201 wird der Kapitalwert be- 
rechnet, in STO E abgespeichert und der Primärspeicher wieder aktiviert. 

Über die Return-Anweisung in Zeile 202 wird das Hauptprogramm mit der Zeile 003 fortgesetzt. 
Die Programmzeile 005 führt wieder in ein Unterprogramm mit der Einsprungadresse Label 4 in 
Zeile 203. In diesem mehrfach benutzten Unterprogramm werden die Hilfsgrößen q- 1 inSTO 1’; 
q" inSTO 2’, q’-1 in STO 3’ und q”"" in STO 4’ abgespeichert. Über den Programmsprung nach 
Label d in Zeile 006 wird in Zeile 013 in einer kurzen Pause der Kapitalwert K,, angezeigt. Mit den 


1) {STO C} bedeutet: Inhalt von STOC 
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Anweisungen 014 bis 019 wird der Wiedergewinnungsfaktor gemäß Gl. (5.4.15) berechnet und 

in STO O abgespeichert. Aus dem Produkt aus Wiedergewinnungsfaktor und Kapitalwert gemäß 
Gl. (5.4.14) wird die Annuität errechnet und in einer langen Pause angezeigt bzw. ausgedruckt. 
Mit den Anweisungen 025 und 026 wird mit Hilfe der Register-Arithmetik der im Kapitaldienst 
enthaltene Anteil zur Werterhaltung errechnet und in STO 5 abgespeichert. Der Kapitaldienst wird 
abschließend nach GI. (5.4.16) aus dem Produkt aus Anschaffungskosten und Wiedergewinnungs- 
faktor berechnet und in STO E abgespeichert. Vor Ende des Programms wird der Primärspeicher 
wieder aktiviert, damit bei abgeschlossenem Programmlauf wieder die ursprüngliche Speicherdefi- 
nition hergestellt ist. 


Start 


Der Programmstart bei Label A führt zu Programmzeile 007. Die folgende Anweisung bewirkt einen 
Sprung in das Unterprogramm C auf Programmzeile 186. Auch hier ist diese Einsprungadresse iden- 
tisch mit der Startadresse für die Kapitalwertmethode. Nach Aktivierung des Sekundärspeicherbe- 
reiches werden die vorhin erläuterten Unterprogramme mit Label 7 und Label 4 aufgerufen. Mit 
den Anweisungen in Zeile 190 bis 199 wird der Kapitalwert gemäß GI. (5.4.5) berechnet. Die 
Return-Anweisung in Zeile 202 bewirkt einen Rücksprung in die Programmzeile 009. Die weitere 
Programmbearbeitung ist identisch mit der im vorhergehenden Abschnitt dargestellten. 


Start [b] 


Der Programmstart bei Label b führt zu Programmzeile 037. Mit der folgenden Anweisung wird 
das Flag O zurückgesetzt. Dies ist erforderlich, da möglicherweise vorher die Programmversion mit 
dem gesetzten Flag O aufgerufen wurde. Nach Aktivierung des Sekundär-Speicherbereiches wird 
im Unterprogramm mit Label 3 ab Zeile 177 der Startwert für den Internen Zinsfuß gebildet. Falls 
inSTO CC ein Wert ungleich Null vorgegeben wurde, so wird dieser beibehalten, andernfalls wird 9 
als Startwert für die Newton-Iteration nach Gl. (5.4.8) benutzt. Nach Aufruf des Unterprogramms 
mit Label 7 erfolgt der Rücksprung in das rufende Programm zu Zeile 041 mit Aktivierung des 
Primär-Speicherbereiches. Ab Programmzeile 042 verläuft die Programmbearbeitung bis auf die 
nun negativen Ergebnisse der Flag-Abfragen in den Zeilen 065 und 083 identisch zu der Version 
unter Start fa. 

Infolge des negativen Ergebnisses der Flag-Abfrage in Zeile 083 wird jedoch der Sprungbefehl nach 
Label 8 in Zeile 084 übersprungen und zwischen den Programmzeilen 069 und 089 eine Schleife 
aufgebaut. Innerhalb der Schleife wird in der Zeile 087 das Unterprogramm mit Label D zur Be- 
rechnung der Zinsfuß-Korrektur gemäß GI. (5.4.13) aufgerufen. 

Der jeweilige Korrekturwert e wird in einer kurzen Pause angezeigt und in STO 5 abgespeichert. 
Mit den Anweisungen 173 bis 175 wird der Vergleichswert 10°* in das X-Register geladen. Nach 
dem Rücksprung in das rufende Programm wird in Zeile 088 10°*<e abgefragt. Erst bei negati- 
vem Abfrage-Ergebnis wird die Iterationsschleife verlassen und das Programm in Zeile 156 fortge- 
setzt. Mit den Anweisungen 161 bis 165 wird aus dem Zinsfaktor mit Gl. (5.4.12) der Zinsfuß r 
als Prozentwert gebildet und als Endergebnis in STO E abgespeichert. 


Start 


Der Programmstart bei Label B führt zu Programmzeile 113. Nach Aktivierung des Sekundär- 
Speicherbereiches wird wie im vorherigen Abschnitt im Unterprogramm mit Label 3 der Startwert 
für die Iteration gebildet. In der Programmschleife zwischen den Anweisungen in Zeile 118 und 
155 wird bei jedem Durchlauf die Gl. (5.4.11) durchgerechnet. Bei negativem Abfrage-Ergebnis 

x Sy der Anweisung in Zeile 154 wird das Programm wie im vorhergehenden Abschnitt in der 
Programmzeile 156 bei Label e fortgesetzt. 
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Start 


Der Programmdurchlauf für den Start bei Label c in Zeile 034 wurde als Unterprogramm-Variante 
für den Start bei Label a bereits dargelegt. Hierbei bedeutet jedoch die Return-Anweisung in Zeile 
202 das logische Ende des Programms. Der Kapitalwert K,, erscheint als Anzeigewert. 


Start 


Auch dieser Programmdurchlauf für den Start bei Label C in Zeile 186 wurde bereits als Unter- 
programm-Variante für den Start bei Label A dargelegt. Das Programm wird wiederum in Zeile 
202 mit dem Kapitalwert K,, in der Anzeige beendet. 


Programmvereinfachungen 


Bei der kritischen Durcharbeitung des Programms wird man an einigen Stellen noch mögliche Ver- 
einfachungen entdecken. So kann man z.B. nach Änderung der Anweisung RCL D in Zeile 057 in 
RCL I die Anweisungen 045 und 050 bis 053 ersatzlos streichen. Intensive Überlegungen zur Ein- 
sparung von Programmzeilen sind jedoch nur dann ökonomisch sinnvoll, wenn die Aufgabenstel- 
lung den verfügbaren Programmspeicherbereich von 224 Programmzeilen überschreitet. 


5.4.3 Durchführung der Investitionsberechnungen 


1; Berechnung des Kapitalwertes für beliebige Bruttoerlösüberschüsse nach GI. (5.4.1): 
Im Programm ist die Auswertung der Bruttoerlöse über 10 Geschäftsjahre vorgesehen. Die 
einzelnen DM-Beträge von Üg(k) werden in den Speichern mit STO O bis STO 9 für die zu- 
künftigen Geschäftsjahre 1 bis 10 nach dem Investitionszeitpunkt abgespeichert. Der An- 
schaffungswert Ao (DM) wird im Speicher A mit STO A und der Kalkulationszinsfuß p (%) 
im Speicher C mit STO C abgespeichert. Nach Betätigung der beiden Tasten fl, läuft 
das Programm ab. Nach etwa 25 Sekunden erscheint der errechnete Kapitalwert in der An- 
zeige als DM-Betrag. 

2. Berechnung des Kapitalwertes für gleichbleibende Bruttoerlösüberschüsse beliebiger Laufzeit 
nach GI. (5.4.3). 
Bei dieser Variante sind nur vier Eingabewerte erforderlich. Der Anschaffungswert Au (DM) 
wird in Speicher A mit STO A abgespeichert. Der Bruttoerlösüberschuß U, (DM) wird in 
Speicher B mit STO B abgespeichert. Der Kalkulationszinsfuß p (%) wird in Speicher C mit 
STO C abgespeichert. Die Laufzeit n (Jahre) wird im Speicher D mit STO D abgespeichert. 
Das Programm wird durch Betätigung der Taste gestartet. Nach etwa 5 Sekunden er- 
scheint der errechnete Kapitalwert in der Anzeige als DM-Betrag. 

3. Berechnung des Internen Zinsfußes für beliebige Bruttoerlösüberschüsse nach Gin. (5.4.10, 
5.4.13): 
Die erforderlichen Eingabewerte und die zugeordneten Speicherplätze sind bis auf den nicht 
benötigten kalkulatorischen Zinsfuß identisch mit Variante (1). Falls der in Speicher C ent- 
haltene Wert ungleich Null ist, wird dieser als Startwert für die Iteration genommen. Andern- 
falls wird ein interner Startwert (po = 9) eingesetzt. Der iterative Lösungswert wird für einen 
maximalen Fehler e = 10°* errechnet. Etwa 8 Sekunden nach dem Start durch 9 
wird in einer kurzen Pause die Anzahl der bewerteten Jahre angezeigt. Die Rechnung wird 
dann selbsttätig fortgesetzt. Nach Abschluß jeder Iteration wird der Fehler e kurz zur An- 
zeige gebracht. Nach etwa 25 bis 60 Sekunden, je nach Güte des Startwertes, wird der er- 
rechnete Interne Zinsfuß als Prozentwert angezeigt. Zur Abkürzung der Rechenzeit kann in 
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den Iterationspausen durch Betätigung der Taste Clear x die Iteration vorzeitig beendet 
werden. 

Berechnung des Internen Zinsfußes für gleichbleibende Bruttoerlösüberschüsse beliebiger 
Laufzeit nach GI. (5.4.11, 5.4.13): 

Die erforderlichen Eingabewerte und die zugeordneten Speicherplätze sind bis auf den nicht 
benötigten kalkulatorischen Zinsfuß identisch mit Variante (2). Das Programm wird durch 
die Taste gestartet. Falls der im Speicher C enthaltene Wert ungleich Null ist, wird wie 
bei Variante (3) dieser Wert als Startwert für die Iteration genommen, andernfalls der interne 
Startwert. Nach Abschluß jeder Iteration wird der Fehler e wie bei Variante (3) kurz zur 
Anzeige gebracht. Nach etwa 10 bis 25 Sekunden, je nach Güte des Startwertes, wird auch 
hier der errechnete Interne Zinsfuß als Prozentwert angezeigt. Der Iterationsprozeß kann 
ebenfalls durch Betätigung der Clear x-Taste in den Iterationspausen vorzeitig beendet 
werden. 

Berechnung der Annuität und des Kapitaldienstes bei der Annuitätenmethode nach Gin. 
(5.4.14, 5.4.16): 

Die erforderlichen Eingabewerte sind identisch mit der Variante (1). Die Berechnung des 
Kapitaldienstes (Annuität) wird nach Betätigung der beiden Tasten [f]. [a] gestartet. Zu- 
nächst wird in einer kurzen Pause die Anzahl der bewerteten Jahre angezeigt. Dann wird der 
Kapitalwert berechnet und ebenfalls in einer kurzen Pause angezeigt. Während der folgenden 
langen Pause wird die Annuität als durchschnittlicher Erlösüberschuß zur Anzeige gebracht. 
Der Rechner hält mit dem Kapitaldienst für die Anschaffungskosten Ay an. Die Rechenzeit 
beträgt ca. 30 Sekunden. 

Bei gleichbleibenden Bruttoerlösüberschüssen sind Eingabewerte entsprechend der Variante 
(2) erforderlich. Die Rechnung wird hier nach Betätigung der Taste ausgeführt und 
bringt ebenfalls innerhalb etwa 15 Sekunden nacheinander den Kapitalwert, die Annuität 
und den Kapitaldienst für die Anschaffungskosten als DM-Beträge zur Anzeige. 


5.4.4 Anwendungsbeispiele 


1. 
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Eine Investition erfordert Anschaffungskosten von 100 000,— DM. Der Kalkulationszinsfuß 
wurde mit 7 % angesetzt. In den folgenden 10 Jahren werden folgende Bruttoerlösüberschüsse 
erwartet: 


Am Ende des 1. Jahres 20 000,— DM 
Am Ende des 2. Jahres 19 000,— DM 
Am Ende des 3. Jahres 19 000,— DM 
Am Ende des 4. Jahres 18 000,— DM 
Am Ende des 5.Jahres 15 000,— DM 
Am Ende des 6. Jahres 19 000,— DM 
Am Ende des 7. Jahres 18 000,— DM 
Am Ende des 8. Jahres 17 000,— DM 
Am Ende des 9. Jahres 16 000,— DM 
0. 


Am Ende des 10. Jahres 15 000,— DM 


Tastenbetätigung für die Eingabe: 


(nur für Kapitalwert- und Annuitätenmethode) 


m m|m 
m|im|m|m 
x|x|x|xX 
EI 
(72) 
— 
dl 


SPPFPePEPRFSR 
lelSjelolaloTelele| 


Zeitaufwand für die Eingabe: ca. 40 Sekunden. 


Tastenbetätigung für den Start der Annuitätenmethode: [a] 
Ergebnisse im Anzeigefeld: 

(1) kurze Pause: 10 = Anzahl der bewerteten Jahre 

(2) kurze Pause: 25 315,82 = Kapitalwert in DM 

(3) lange Pause bzw. Ausdruck: 3604,40 = Annuität in DM 

(4) Stop: 14 237,75 = Kapitaldienst für die Anschaffungskosten in DM 
Rechenzeit: ca. 30 Sekunden. 


Tastenbetätigung für den Start der Internen Zinsfuß-Methode: [p] 

Kurze Pause: 10 = Anzahl der bewerteten Jahre 

In weiteren kurzen Pausen wird die Abweichung zwischen den beiden Zinssätzen der vorher- 
gegangenen Iterationsschritte angezeigt. 

Nach Stop: 12,43 = Interner Zinsfuß in % 

Rechenzeit: 25 bis 60 Sekunden für Startwerte in Speicher C zwischen 12 % und 0 %. 


Tastenbetätigung für den Start der Kapitalwertmethode: [e] 

Ergebnisse im Anzeigefeld: 

(1) kurze Pause: 10 = Anzahl der bewerteten Jahre 

(2) Stop: 25 315,82 = Kapitalwert in DM 

Rechenzeit: ca. 25 Sekunden. 

Eine Investition erfordert Anschaffungskosten von 7,2 Mio DM. Der Kalkulationszinsfuß 

wird mit 6,5 % angesetzt. 

In den folgenden 30 Jahren werden gleichbleibende Bruttoerlösüberschüsse von 630 000,— DM 


erwartet. 
Tastenbetätigung für die Eingabe: 


[] O0 ® 
[IE] ex] El 
[6] [a [5] (nur für Kapitalwert- u. Annuitätenmethode) 
[0] [0] 


Tastenbetätigung für den Start der Annuitätenmethode: 
Ergebnisse im Anzeigefeld: 

kurze Pause: 1 026 965,82 = Kapitalwert in DM 
lange Pause bzw. Ausdruck: 78 642,42 = Annuität in DM 
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Stop: 551 357,58 = Kapitaldienst für die Anschaffungskosen in DM 
Rechenzeit ca. 15 Sekunden. 


Tastenbetätigung für den Start der Internen Zinsfußmethode: 

Ergebnisse im Anzeigefeld: In kurzen Pausen wird die Abweichung zwischen den beiden 
Zinssätzen der vorhergegangenen Iterationsschritte angezeigt. 

Nach Stop: 7,84 = Interner Zinsfuß in % 

Rechenzeit: 10 bis 25 Sekunden für Startwerte im Speicher C zwischen 8 und 0 %. 


Tastenbetätigung für den Start der Kapitalwertmethode: 
Nach Stop: 1 026 965,82 = Kapitalwert in DM 
Rechenzeit: ca. 5 Sekunden. 


5.4.5 Programmvariante für erweiterten Erlöszeitraum und Wachstumsansatz 


Bei der Wirtschaftlichkeitsbeurteilung langlebiger Wirtschaftsgüter wie z.B. Fabrikanlagen, Kraft- 
werke können zu Ende der kalkulierten Nutzungsdauer erlösschmälernde Kosten durch die Still- 
legung und den Abbruch der Anlagen entstehen, die bei der dynamischen Wirtschaftlichkeitsbe- 
rechnung mit berücksichtigt werden sollen. Da hierbei mit unterschiedlichen Bruttoerlösüberschüs- 
sen über einen Kalkulationszeitraum, der zehn Jahre übersteigt, zu rechnen ist, soll das Programm 
für diese Variante durch Einführung eines Dehnungsfaktors d erweitert werden, ohne die festge- 
legte Bedienungs- und Speicherorganisation im wesentlichen zu verändern. 

Die Brutto-Erlösüberschüsse sind daher auf maximal zehn Intervalle mit dem Intervallabstand von 
d Jahren zu verteilen. 

Der Faktor d=3 würde z.B. bedeuten, daß beliebige Brutto-Erlösüberschüsse jeweils auf die Zeit- 
punkte 3,6,9, ... , 30 Jahre nach Inbetriebnahme akkumuliert in den Speichern STO O bis STO 9 
abzuspeichern sind. Der Dehnungsfaktor d ist als Eingabewert in STO D abzuspeichern. 

Die Summation in den Gin. (5.4.1 und 5.4.9) sind dann nicht mehr über k=a mita=1,2,3,...,n 
sondern über k= ad mita=1,2,3,....,n zu erstrecken. Die vorher gebildete Potenz q? ist dann 
zusätzlich mit dem Dehnungsfaktor d zu potenzieren: (gPje = de Diese zusätzliche Operation ist 
in der Programmvariante Il nach Tabelle 5.4.2 in den Zeilen 089 und 090 programmiert. 

Das Unterprogramm Label 4 wurde um die Berechnung des Wiedergewinnungsfaktors w nach 

GI. (5.4.15) in den Zeilen 204 bis 208 erweitert. Für die Newton-Iteration in dem Programmteil 
Label B wurden zur Einsparung von Programmzeilen eine modizierte Form für f(q) und f’(q) 
gewählt: 


f(q) = Aow Üg (5.4.18) 
' n 1 ng"=" \ 

f ==. _ 5.4.19 
(q) (2 q-1 "Pr ) w ( ) 


Der Wiedergewinnungsfaktor wird in Zeile 118 nach STO 7 abgespeichert. In den folgenden Anwei- 
sungen von Zeile 119 bis 138 ist die Newton-Verbesserung gemäß den Gin. (5.4.18 und 5.4.19) 
programmiert. 

Bei der Programmvariante || wird zusätzlich die Möglichkeit geboten, bei der Wirtschaftlichkeits- 
untersuchung von Investitionen, die mengenabhängige Erlöse erbringen, über die Nutzungsdauer 
eine kontinuierliche Veränderung der Erlöse mit einer kalkulierten Wachstumsrate s zu bewerten. 
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Tabelle 5.4.2 Anweisungsliste „Wirtschaftlichkeitsberechnung II” 


Annuität__ 661 »iBLa 
862 sF2 

663  65Bc 

884 _6T0d 


Annuität 665 _ &LBLA 


. 


Kapitalwert 839 xiBLe 


636 _ _6TOB 
I.Zinsfuß 637 #LBLb 


. 


866 E73 
867 6SBC 

665 %LBLld 
685 STOI 

616 PSE=DK, 
8il *5 
ei2 | 6567 
813 | LSTX 
did Ä 

615 | STO6 
@eiö | RCLI 
617 | RÜLD 

815 x 

613 | 6554 

628 | STO8 

821 | RÜLI 

d22 x 

823 | PRTIS=DA 
624 | RCiA 

825 | RCL8 
826 x 

627 #5 

825 PRTIÄ=DK, 
629 LSTX 
838 EEX UP 
631 Z 

632 x 

833 RrS=D>ko 
835 E77 

638 [#77 

639 F&S 

848 T 6553 

641 PES 

642 xLBL8 
643 6 

644 STOE 
645 9 

645  $STWWI 

647 »LBLl 

6456  RiLi 

649 #6? 

656  6T02 

651 DSZI 

052 6T61 

053 »LBi2 

654  1ISZI 

655 RCLI 


856 
857 
858 
859 
868 
661 
862 
863 
864 
865 
666 
867 
666 
863 
676 
671 
872 
673 
874 
875 
876 
877 
878 
873 
856 
861 
882 
863 
854 


685 


686 
857 
868 
883 
836 
631 
692 
893 
634 
695 
896 
897 
895 
693 
186 
16i 
162 
183 
164 
185 
186 
187 
186 
183 
116 
1li 


F2S 168 »LBLd 
$T09 113 P2S 165 STOC 
DSP& 114 | 65B3 ira 6567 
RCLD 115 |xLBL5H izi__RIN 
x 116 | RCLD 
PSE=>n 117 | 6584 i73m Fa5 
DSP2 118 | 5107 174 1 
Fo? 119 | RCLA ı75 | 5703 
6SB7 1288| x i76 | 6557 
*LBL9 121 | RCLB 177 | RCLD 
1 12| - 178 | 6554 
6 123 | RCLD 175 | 18 
$TOI 124 | RCL6 i86 | RCLB 
1 15| = 181 x 
$T05 126 | RCLi @—eisZ |»LEL8 
8 127 | 178 183 | Reia 
sT07 18 | + 154 - 
STO8 123 | RCL4 185 | 5105 
6SBE 136 | RCLD isc“ F2S 
RCLA 131 x 187° F2? 
RCL? 132 | RCi3 1868 RIN 
F8? i33| = 185 PRTX=DK, 
CTOB— 134 - 136 RS 
- 135 | RCL? UP 191 LBl4 
RCLS 1355| x 152 RCLE 
6SBD 137 | RCLA 193 5701 
x? | 1338| x ISDN 
6703 135 | 65BD 195 yx 
6Tie i48 | xy? 196  STO2 
#LBL& 141 | 6705 197 5703 
RCLi 142 |#LBLe 158  RÜLE 
1521 143 1 195 * 
RCLE 144 | RÜLE 208  STO4 
Rco | 15| % 281 1 
yx 166 | + 262 ST-1 
RCLS 147 | STx6 263  5T-3 
x 148 1 264  RLLI 
sTos 149 | RCLE 265  RÜLZ 
+ 158 | zCH Fu 
ST+7 i5id PzS 267 RELZ 
RCLE 152 PRTX x 
* 153__R’S=Dr 26° _RTN 
RELI UP 154 «LBLD UP 2Zi0 AlbLr 
1 15 = zii 1 
6 156 FSE=DE 212  RELE 
- 157 ST-6 IE NZ 
STos 158 ABS 214 + 
RCLD 159 EEX 215 1 
x 166 CHS 216 RCLE 
x 161 4 Bir. % 
ST+8 162 RN ZB oo + 
RCLB 163 #LBL3 213 = 
RCLI 164  RELC 226  5STO6 
872 | 165 X#8° 221 RIN 
ETOE 166 6TO8 FF 775 
RTN 167 3 
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In der elektrischen Energieversorgung kann z.B. eine mit der Steigerung der Bruttosozialprodukte 
einhergehende Steigerung des elektrischen Energiebedarfs beobachtet werden. Definiert man einen 
Veränderungsfaktor f aus der jährlichen Wachstumsrate s: 


B 
100 % 


f=1+ 


so läßt sich die Wachstumsabhängigkeit des Kapitalwertes formulieren: 
Ku = 2, Unlk) 7 =Ao (5.4.20) 
q R 


An Stelle des Quotienten f/q läßt sich ein Ersatz-Zinsfaktor q* bilden, mit dem die Gl. (5.4.20) 
wieder in die Ausgangsgleichung (5.4.1) zurückgeführt wird: 


q” -3 (5.4.21) 


Für den Ersatzzinsfuß gilt: 


lerne 


100% +s 1) 100% (5.4.22) 
Der Ersatz-Zinsfaktor q* ist für die Kapitalwert- und Interne Zinsfuß-Berechnung einzusetzen. Die 
daraus folgende Annuität und der Kapitaldienst sind wieder mit dem Zinsfaktor q zu ermitteln. 
Mit den Anweisungen in den Zeilen 012 bis 015 wird in STO 6 wieder der Zinsfaktor q=q*: f 
abgespeichert, um damit die Annuität und den Kapitaldienst zu berechnen. Bei der Internen Zins- 
fuß-Methode wird in den Zeilen 143 bis 147 ebenfalls aus dem ermittelten ar durch Multiplikation 
mit f wieder q, gebildet. 

Die Wachstumsrate s ist als Eingabewert in Prozent in STO E abzuspeichern. Zur Bildung des Ersatz- 
Zinsfußes wurde das Unterprogramm Label 7 um die Programmzeilen 215 bis 219 erweitert. 

Bei der Annuitätsberechnung wird zum Abschluß in den Zeilen 029 bis 032 zusätzlich der Kapital- 
dienst als Prozentwert vom eingesetzten Kapital berechnet und angezeigt. Damit wird man nach 
Eingabe des Zinsfußes in STO C und der Laufzeit in STO D durch Betätigung der Taste A unmit- 
telbar den prozentualen Kapitaldienst als Ergebnisanzeige nach dem Stop des Programms erhalten. 
Bei den Berechnungsvarianten für variable Bruttoerlösüberschüsse (Start fa, fb, fc) wird STO E pro- 
grammintern in den Zeilen 043 und 044 gleich Null gesetzt. Das Programm belegt insgesamt 221 
Anweisungszeilen. 

Über eine recht nützliche weitere Variante zur Wirtschaftlichkeitsberechnung von Investionen mit 
variablen Erlösüberschüssen auf der Basis eines äquivalenten konstanten Überschusses wird von 

A. Harms [35] berichtet. 


5.4.6 Anwendungsbeispiele 


1. Ein Kraftwerk erfordert ein Investitionsvolumen von 1,8 Milliarden DM (STO A). Der Kalku- 
lationszinsfuß wird mit 5 % angesetzt (STO C). Über die kalkulierte Lebensdauer von 30 
Jahren werden in 10 Jahresintervallen von je 3 Jahren (STO D) folgende Brutto-Erlösüber- 
schüsse erwartet: 
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Nach 3 Jahren Erlöse 500 Mio DM (STO 0) 


6 Jahren Erlöse 600 Mio DM (STO 1) 

9 Jahren Erlöse 700 Mio DM (STO 2) 
12 Jahren Erlöse 700 Mio DM (STO 3) 
15 Jahren Erlöse 700 Mio DM (STO 4) 
18 Jahren Erlöse 600 Mio DM (STO 5) 
21 Jahren Erlöse 400 Mio DM (STO 6) 
24 Jahren Erlöse 300 Mio DM (STO 7) 
27 Jahren Erlöse 200 Mio DM (STO 8) 


30 Jahren Abbruchkosten - 500 Mio DM (STO 9) 


Die Annuitätenrechnung liefert nach [2]: 

(1) kurze Pause: 30 = Anzahl der bewerteten Jahre 

(2) kurze Pause: 681 163 093,00 = Kapitalwert in DM 

(3) lange Pause bzw. Ausdruck: 44 310 636,74 = Annuität in DM 

(4) lange Pause bzw. Ausdruck: 117 092 583,20 = Kapitaldienst in DM 
(5) Stop: 6,51 = Kapitaldienst in % 

Rechenzeit: rund 45 Sekunden 


Die Interne Zinsfußrechnung liefert nach [p]: 

(1) kurze Pause: 30 = Anzahl der bewerteten Jahre 
(2) Stop: 8,47 = Interner Zinsfuß in % 
Rechenzeit: rund 120 Sekunden 

Die Kapitalwertrechnung liefert nach [e]: 

(1) kurze Pause: 30 = Anzahl der bewerteten Jahre 
(2) Stop: 681 163 093,00 = Kapitalwert in DM 
Rechenzeit: rund 30 Sekunden 


Im Bild 5.4.2 ist Entwicklung des Kapitalwertes über die Nutzungsdauer der Anlage bezogen 
auf den Investitionszeitpunkt aufgetragen. Nach dem fünfzehnten Betriebsjahr wird erstmalig 
ein positiver Kapitalwert der Investition erreicht. Infolge der Barwertbezogenheit der Brutto- 
Erlösüberschüsse werden die 


weiter in der Zukunft zu er- 1 | T 
warteten Überschüsse wert- 10’DM | | 101 
mäßig immer unbedeutender. | | | N 
So belasten die in 30 Jahren 0.5 | ö ü T | N \ N SS 
zu erwartenden Abbruch- | | | N SN 
. % posı Wer | apı alwer 
kosten von 500 Mio DM den 0 3 9 RT BENZINIEINZIS N 
; ER - - 
Kapitalwert lediglich um 90 ZOG, 
115,69 Mio DM, d.h. mit > BRHAGY 
rund 23 % des angesetzten 7 DELET / 
Nominalwertes. -057 0, 70 7 
GISTID IDG 
r DIDSIASE, 
100 
Y 
-1,5 

Bild 5.4.2 : 
Entwicklung des Kapitalwertes Ay r 
über die Nutzungsdauer -2 
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Der Betrieb eines Versorgungsunternehmens läßt einen Erlösüberschuß von jährlich 142 000,—DM, 

bezogen auf die heutige Abgabe erwarten. Für den Kalkulationszeitraum von 30 Jahren ist infolge 

Absatzsteigerung mit einer jährlichen Steigerungsrate der Erlöse von 2,5 %/Jahr zu rechnen. Der 

Zinssatz wurde zu 5 % angesetzt. 

a) Bei welchem Kaufpreis wird der Kapitalwert der Investition gerade Null (Grenz-Kaufpreis)? 

b) Welchen Betrag erreicht der Kapitlawert für die Investition, wenn die kalkulierte Erlös- 
steigerung von 2,5 %/Jahr nicht eintritt? 


Zu a) 
Der Grenz-Kaufpreis ist gleich dem Kapitalwert für verschwindende Anschaffungskosten. 
Eingaben: 0 STOA Anschaffungskosten 


142000 STOB Erlöse 
5 STOC Zinsfuß 

30 STOD Nutzungsdauer 

2,5 STOE Steigerungsrate 
Start [ec]: Grenz-Kaufpreis 2 996 409,70 DM 
Rechenzeit rund 5 Sekunden 
Zur Kontrolle kann der Grenz-Kaufpreis in STO A abgespeichert und durch Betätigung der 
Taste C der Kapitalwert bestimmt werden: 
STO A, Start |C |: Kapitalwert = 0,00 DM 
Zu b) 
Nach Eingabe des Grenz-Kaufpreises in STO A kann der Kapitalwert für ausbleibende Erlös- 
steigerung bestimmt werden: 


0 STOE d.h.keine Steigerung 
Start [C ]: Kapitalwert = - 813 521,65 DM 
Rechenzeit rund 5 Sekunden 


Durch den Aufruf der Berechnungsvariante ‚‚Annuität‘ kann die jährliche Unterdeckung 
ermittelt werden: 

Start [A]: Annuität = - 52 920,75 DM 

(d.h. jährlicher Verlustanteil) 

Kapitaldienst = 194 920,75 DM entsprechend 6,51 % vom Grenz-Kaufpreis 

Ein weiteres Beurteilungskriterium liefert der Interne Zinsfuß: 

Start [8]: Interner Zinsfuß = 2,44 % 

Bei eintretender Erlössteigerung würde die Annuitätsrechnung folgende Ergebnisse bringen: 


2,5 STOE 
Start [A]: Annuität = 0,00 DM 
Kapitaldienst = 194 920,75 DM entsprechend 6,51 % vom Grenz-Kaufpreis 


Die Annuität 0,00 DM besagt, daß der Kapitaldienst für die Finanzierung des Grenz-Kauf- 
preises gerade durch die jährlichen Erlösüberschüsse gedeckt werden kann. 

Start [e]: Interner Zinsfuß = 5,00 % 

Für verschwindenden Kapitalwert ist der Interne Zinsfuß identisch mit dem angesetzten 
Kalkulationszinsfuß. 


5.5 Einkommensteuerberechnung 


In diesem Abschnitt wird die Anwendung programmierbarer Taschen/Tischrechner als Ersatz für 
umfangreiche Tabellenwerke bei der Feststellung der Einkommensteuer dargelegt. 

Die programmierte, mathematisch eindeutige Formulierung des Einkommensteuertarifs bringt den 
Vorteil mit sich, daß bei Änderung einzelner Tarifkonstanten auch nur diese geändert werden müs- 
sen und nicht auf den Neudruck eines ganzen Tabellenwerkes zurückgegriffen werden muß. 
Grundlage der Einkommensteuer-Berechnung ist der geltende Einkommensteuertarif, z.Z. in der 
Fassung gemäß 5 32a EStG 1977 vom 5. Dezember 1977 (BGBL I, S. 2365) [21], anzuwenden ab 
Veranlagungszeitraum 1978. 

Dieser Einkommensteuertarif hat folgenden Aufbau: 


a) Null-Zone (Steuerfreiheit) für zu versteuernde Einkommen von 0 bis 3329,— DM, 

b) _Proportionalzone mit einem Steuersatz von 22 v.H. für zu versteuernde Einkommen von 
3330,— bis 16 019,— DM, 

c) Progressionszone mit einem ansteigenden Steuersatz von 30,8 bis 56 v.H. für zu versteuernde 
Einkommen von 16 020,— bis 130 019,— DM, 

d) Proportionalzone mit einem Steuersatz von 56 v.H. für zu versteuernde Einkommen 
ab 130 020,— DM. 


Für Ehegatten, die zusammen zur Einkommensteuer veranlagt werden, ist das Splitting-Verfahren 
anzuwenden. Bei dem Splitting-Verfahren wird die Einkommensteuer für die Hälfte des gemein- 

sam zu versteuernden Einkommens beider Ehegatten ermittelt und der Steuerbetrag sodann ver- 
doppelt. 

Bemessungsgrundlage für die tarifliche Einkommensteuer ist das zu versteuernde Einkommen. Das 

zu versteuernde Einkommen ergibt sich aus dem Gesamtbetrag der Einkünfte, vermindert um die 
Summe der abzugsfähigen Aufwendungen und Freibeträge. Für die Berechnung ist $ 32a anzuwenden: 


$ 32a Einkommensteuertarif 


(1) Die tarifliche Einkommensteuer bemißt sich nach dem zu versteuernden Einkommen. Sie be- 
trägt vorbehaltlich der 85 32b, 34 und 34b jeweils in Deutsche Mark 
T: für zu versteuernde Einkommen bis 3329,— DM: 0; 
2: für zu versteuernde Einkommen von 3330,— DM bis 16019 DM: 0,22x — 726; 
cc für zu versteuernde Einkommen von 16 020,— DM bis 47 999 DM: 
[(- 49,2y + 505,3) y + 3077] y + 2792; 
4. für zu versteuernde Einkommen von 48 000,— DM bis 130 019 DM: 
{[0,1z - 6,07) z + 109,95] z + 4800} z + 16 200; 
5. für zu versteuernde Einkommen von 130 020 DM an: 0,56x —- 12 742. 


„x ist das abgerundete zu versteuernde Einkommen. „y’' ist ein Zehntausendstel des 16 000,— DM 
übersteigenden Teils des abgerundeten zu versteuernden Einkommens. „‚z‘ ist ein Zehntausendstel 
des 48 000,— DM übersteigenden Teils des abgerundeten zu versteuernden Einkommens. 


(2) Das zu versteuernde Einkommen ist: 

1. auf den nächsten durch 30 ohne Rest teilbaren vollen DM-Betrag abzurunden, wenn es nicht 
mehr als 48 000,— DM beträgt und nicht bereits durch 30 ohne Rest teilbar ist, 

2\ auf den nächsten durch 60 ohne Rest teilbaren vollen DM-Betrag abzurunden, wenn es mehr 
als 48 000,— DM beträgt und nicht bereits durch 60 ohne Rest teilbar ist. 
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(3) Die zur Berechnung der tariflichen Einkommensteuer erforderlichen Rechenschritte sind in 
der Reihenfolge auszuführen, die sich nach dem Horner-Schema ergibt. Dabei sind die sich 
aus den Multiplikationen ergebenden Zwischenergebnisse für jeden weiteren Rechenschritt 
mit drei Dezimalstellen anzusetzen; die nachfolgenden Dezimalstellen sind fortzulassen. Der 
sich ergebende Steuerbetrag ist auf den nächsten vollen DM-Betrag abzurunden. 


5.5.1 Berechnungsgrundlagen 


Der in S 32a vorgegebene Einkommensteuertarif läßt sich mit E, als das zu versteuernde Einkom- 
men in mathematischer Form durch folgende Gleichungen formulieren: 


a: 
up (5.5.1) 
1 ledig 
k+ = | für (5.5.2) 
2 verheiratet 
& 30 E: < 48.000 " 
30 en 
x= £* für (5.5.3) 
s * 
BE 60 E,; > 48000 
_ x 16 000 
vTo00 (5.5.4) 
x 48 000 
10 000 (5.5.5) 
fi) x<s 3329 
0,22x - 726 3330 <Sx<s 16019 
S* = [(- 49,2y + 505,3) y + 3077]y + 2792 16020 <y<s 47999 (5.5.6) 
{[(0,1z - 6,07) z + 109,95]z + 4800} z + 16200 48000 <z < 130 019 
0,56x - 12742 130 020 <x 
S=k+[S*] (5.5.7) 
Für alle Multiplikationen in Gl. (5.5.6) gilt: 
*.b*. 1000 
a'b „ae an (5.5.8) 


1000 


Mit dem Gleichungssystem Gin. (5.5.1 bis 5.5.8) läßt sich zu jedem zu versteuernden Einkommens- 
betrag E, der Steuerbetrag S ermitteln. Neben dem Steuerbetrag interessiert insbesondere der je- 
weilige Spitzensteuersatz $ und der Durchschnittssteuersatz s. Der Spitzensteuersatz $ gibt an, 
mit welchem Prozentsatz der nächste Einkommenszuwachs steuerlich belastet wird. Er egibt sich 
daher aus dem Differentialquotienten des Steuerbetrages: 


zT „et ey able (5.5.9) 


N [x] bedeutet die größte ganze Zahl < x 
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An Stelle des durch Gl. (5.5.3) vorgegebenen treppenförmigen Verlaufs der Variablen x,y,z in 
Intervallen für x mit 30,— DM bzw. 60,— DM Intervallbreite wird, um in allen Punkten innerhalb 
der Definitionsbereiche Differenzierbarkeit zu erreichen, die Variable x unter Umgehung der Gl. 
(5.5.3) gleich dem zu versteuernden Einkommen E: gesetzt. 

GI. (5.5.9) angewandt auf Gl. (5.5.6) ergibt in den einzelnen Geltungsbereichen folgende Bezie- 
hungen für den Spitzensteuersatz S: 


0% 
22% 
s=* (- 49,2: 3y? + 505,3: 2y + 3077) 10? % (5.5.10) 
(0,1: 42° - 6,07: 32? + 109,95 - 2z + 4800) 10°? % 
56% 


Der Durchschnittssteuersatz 5 gibt an, mit welchem Prozentsatz das gesamte zu versteuernde Ein- 
kommen effektiv belastet wird. Er ergibt sich daher aus dem Quotienten von Steuerbetrag und 
Einkommensbetrag 


5-2: 100% (5.5.11) 
s 


5.5.2 Steuerentlastung durch Freibeträge 


Für die Berechnung der steuerlichen Entlastung durch Freibeträge [22] ist der individuelle Spitzen- 
steuersatz maßgebend. 

Die Umkehrung der GI. (5.5.9) zeigt, daß der Steuerbetrag auch durch Integration des Spitzen- 
steuersatzes über den zu versteuernden Einkommensbetrag ermittelt werden kann: 


E,; 
S= [ 500 0x (5.5.12) 
x=0 


Ein zusätzlicher finanzamtlich anerkannter Freibetrag F, vermindert das zu versteuernde Einkom- 
men auf den Betrag E,- F,. 
Unter Berücksichtigung dieser neuen oberen Integrationsgrenze ergibt sich eine Steuerersparnis Se: 


E, Es-Fz 
Se = [ Sax - [300 0x (5.5.13) 
x=0 KO 
Es-Fz 
Se =- IECE, (5.5.14) 
Es 


Ist der betrachtete zusätzliche Freibetrag klein gegenüber dem Einkommensbetrag, so kann der 
Spitzensteuersatz in dem Intervall F, als konstant angenommen werden, so daß für die Steuer- 
ersparnis Se außerhalb der Sprungstellen für den Spitzensteuersatz näherungsweise gilt: 


Se =S(E,)F, (5.5.15) 


Aus Gl. (5.5.15) ist daher zu entnehmen, daß die Steuerersparnis gleich dem Produkt aus dem 
Spitzensteuersatz und dem zusätzlich absetzungsfähigen Freibetrag ist. 
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5.5.3 Programmbeschreibung „Einkommensteuer 


Die Anweisungsliste eines Programms für die Rechnertypen HP-67/97 ist in Tabelle 5.5.1 angegeben. 
Das Programm besteht aus einem Hauptprogramm mit einer Weiche zur Steuerung des Ablaufes in 
Abhängigkeit des Zustandes von Flag 1 und fünf Unterprogrammen. Es umfaßt 220 Programmzei- 
len. Der zu versteuernde Einkommensbetrag ist vor dem Start in das X-Register einzugeben. Das 
Programm kann wahlweise für Verheiratete über Label [E] und für Ledige über Label [e] ge- 
startet werden. Durch die logische Abfrage x # y in Programmzeile 013 wird der sekundäre Speicher- 
bereich unabhängig vom vorhandenen Zustand aktiviert. Das Flag 1 soll vor dem erstmaligen Ab- 
speichern des Programms gesetzt sein, so daß standartgemäß der Sprung in Zeile 016 nach Label 7 
ausgeführt wird. Wurde über die Tastatur des Rechners das Flag 1 gelöscht, so wird der eingegebene 
Einkommensbetrag um die Summe aus maximaler Vorsorgepauschale und den Freibetrags-Pauschal- 
beträgen von 5 344,— DM (STO 9‘) für Ledige und dem doppelten Wert für Verheiratete zuzüglich 
900,— DM mal Anzahl der Kinder verringert. Hierzu kann die Anzahl der Kinder nach einem Pro- 
grammstop mit dem Anzeigewert Null bei Programmzeile 024 eingegeben werden. Das Kriterium 

für die Anwendung des Splitting-Verfahrens wird durch Flag O gegeben. Für Verheiratete wird 

Flag O in Programmzeile 002 gesetzt und für Ledige in Zeile 005 gelöscht. In den Programmzeilen 
041 bis 048 wird dann der Splittingfaktor k+ nach Gl. (5.5.2) in STO A abgespeichert und der ganz- 
zahlige Einkommensbetrag E! nach GI. (5.5.1) gebildet. Anschließend wird nach GI. (5.5.3) der 
gerundete zu versteuernde Einkommensbetrag gebildet, in STO D abgespeichert und in einer kurzen 
Pause in Programmzeile 063 angezeigt. 

Über maximal 4 logische Vergleiche in den Programmzeilen 065, 074, 088 und 118 wird das gültige 
Intervall zu Anwendung der Gin. (5.5.6 und 5.5.10) herausgefunden. Die Gin. (5.5.4 und 5.5.5) wer- 
den in dem Unterprogramm Label d und die GI. (5.5.8) wird in dem Unterprogramm Label b ausge- 
wertet. Das Ende der Berechnung ist mit dem Sprung nach Label a in Programmzeile 171 erreicht. 
In langen Pausen wird der Spitzensteuersatz s und der Durchschnittssteuersatz 5 angezeigt. 

Der Programmlauf hält mit der Anzeige des Steuerbetrages an. Nach Betätigung der R/S-Taste wird 
noch der verbleibende Netto-Einkommensbetrag angezeigt. 


5.5.4 Speicherplatzbelegung 


Das Programm benötigt einen permanenten Datensatz, in dem die Konstanten des Einkommen- 
steuertarifs abgespeichert sind. Diese Daten werden über eine Datenkarte mit folgender Ordnungs- 
struktur zur Verfügung gestellt: 


Primärspeicher Sekundärspeicher 
STO 1: 0,22 STO 1':0,1 

STO 2: 726 STO 2’: 6,07 
STO 3 : 48000 STO 3’: 109,95 
STO 4 : 3330 STO 4’: 4800 
STO 5 : 16019 STO 5’: 16200 
STO6:-49,2 STO 6': 0,56 
STO 7 : 505,3 STO 7': 12742 
STO 8 : 3077 STO 8': 130019 
STO 9: 2792 STO 9': 5344 
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Tabelle 5.5.1 Anweisungsliste „Einkommensteuerberechnung bis 1978'' 


Start _ 66i _ «L5LE| verh. 857 

öbz SF& 858 
663 __6T08 853 

[Start 864 #LBle]led. 660 
665 CF& 861 
Bö6 xLBLö 662 
667 DSF 863 
665 STOE 864 
663 STOC 865 
sie R£ÜI 866 
si » 667 
6lz i 865 
6i3 AFi? 869 
Glide F2S 678 
815 Fi? 671 
is | 6107 672 
di? ‚| 873 
618 F6? 874 
615 2 875 
626 | RCL3 876 
Bi x 877 
622 | STO& 875 
823 ö 873 
824 R’5<FKinder | 886 
625 9 681 
826 6 882 
d27 ö 663 
625 x 684 
623 | ST+ö 885 
636 | RöL& 866 
831 CcHS 887 
632 FSE=>F Ffpuß85 
633 | RCLC 863 
634 + 638 
835 | STOC LER 
636 |«LBL7 652 
837 P2S 693 
835 3 834 x 
635 [) 635 RCL? 151 | RCL4 267  STOB 
646  5STO06 6936 6556 152 I + 265 RTN 
641 1 697  RELE __|. 153 _—-6T0a UP 289 xLbld 
842 Fa? 6938 6556 UP 154 «LBL5 218 = 
643 2 693 RCLI 199 2 il EEX 
644 STüA 188 + 156 x 212 4 
645  RCLC 16i  65Be 157 RCLI 213 * 
846  RCLA 162  RÜLE 155 x 214  5T0I 
847 Z 163 3 158 # 215 RTN 
648 INT 184 x 168 RTN UP Zie »LBL6 
643  STOI 185 RÜI lei xLBL4 217 * 
658 RÜL3 186 Äe l6e2 RÜLE 216 RCLI 
65i 7? 167 x 163 x 215  65Bb 
852 6706 186 RCL? l6e4  RÜL?7 228 RTN 
653 2 183 6555 165 = 221 RS 
654 5Tx8 116 KRCLS l66 6866 
655 #LBL6 111 + le?  RCLE 
656 RCELI liZ2  6T0a 165 EEX 
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5.5.5 Graphische Darstellung des Einkommensteuertarifs 


Um die dargelegten Ergebnisse für die praktische Nutzanwendung deutlich zu machen, sind in 

Bild 5.5.1 die Kennlinien für den Spitzensteuersatz, den Durchschnittssteuersatz und dem Steuer- 
betrag angegeben. Auf der Abszissenachse sind für die beiden Veranlagungsgruppen ledig und ver- 
heiratet zwei getrennte Maßstäbe angegeben. Für die beiden Steuersätze gilt die Skalierung der 
linken Ordinatenachse in Prozent. Die Skalierung in DM der rechten Ordinantenachse gilt für die 
beiden unteren Steuerbetrags-Kennlinien. Die Differenz der beiden Steuerbetragskennlinien weist 
die Steuerersparnis auf Grund des Splitting-Verfahrens bei Verheiratete gegenüber Ledigen bei 
gleichem Einkommensbetrag aus. Die unterste Kennlinie gibt den Steuerbetrag für Verheiratete 

in Verbindung mit der Abszissenskalierung für Ledige direkt an. Die obere Steuerbetrags-Kennlinie 
gibt dagegen in Verbindung mit der Skalierung für Ledige den entsprechenden Steuerbetrag an und 
in Verbindung mit der Skalierung für Verheiratete gemäß dem Splitting-Verfahren nur den halben 
Steuerbetrag. 


= u mg “ 60000 
| 8 EI 3 DM 
3 3 A 
oo 
u = 
© © 
ew 000 © 
Fi ® 
= iv) 
30 30000 
20 20000 
10 10000 
_ mr < 
ee ER 0 
0 Led. 20.000 40000 60000 80000 DM 100000 
0 verh. 40000 80000 120000 160000 DM 200000 
——- zu versteuerndes Einkommen 
Bild 5.5.1 Graphische Darstellung des Einkommensteuertarifs 1978 1) ab 1979 
5.5.6 Testbeispiele 
1: Zu versteuernder Einkommensbetrag 30 000,— DM 
Start für ledig: 
(1) kurze Pause: 30 000 = gerundeter, zu versteuernder Einkommens- 
betrag in DM 
(2) lange Pause bzw. Ausdruck: 42,0 = Spitzensteuersatz in % 
(3) lange Pause bzw. Ausdruck: 26,5 = Durchschnittssteuersatz in % 
(4) Stop: 7 955,00 = Steuerbetrag in DM 
(5) Nach R/S: 22 045,00 = Nettobetrag in DM 


Rechenzeit rund 20 Sekunden. 
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Start für verheiratet: 


(1) kurze Pause: 15 000 = gerundeter, nach dem Splitting-Verfahren 
zu versteuernder Einkommensbetrag in DM 

(2) lange Pause bzw. Ausdruck: 22,0 = Spitzensteuersatz in % 

(3) lange Pause bzw. Ausdruck: 17,2 = Durchschnittssteuersatz in % 

(4) Stop: 5 148,00 = Steuerbetrag in DM 

(5) Nach R/S: 24 852,00 = Nettobetrag in DM 


Zu versteuernder Einkommensbetrag 60 000,— DM 


Start [le] für ledig: 


(1) kurze Pause: 60 000 = gerundeter, zu versteuernder Einkommens- 
betrag in DM 

(2) lange Pause bzw. Ausdruck: 50,4 = Spitzensteuersatz in % 

(3) lange Pause bzw. Ausdruck: 36,8 = Durchschnittssteuersatz in % 

(4) Stop: 22 108,00 = Steuerbetrag in DM 

(5) Nach R/S: 37 892,00 = Nettobetrag in DM 

Start [E] für verheiratet: 

(1) kurze Pause: 30 000 = gerundeter, nach dem Splitting-Verfahren zu 
versteuernder Einkommensbetrag in DM 

(2) lange Pause bzw. Ausdruck: 42,0 = Spitzensteuersatz in % 

(3) lange Pause bzw. Ausdruck: 26,5 = Durchschnittssteuersatz in % 

(4) Stop; 15 910,00 = Steuerbetrag in DM 

(5) Nach R/S: 44 090,00 = Nettobetrag in DM 


Brutto-Einkommensbetrag: 50 000,— DM, verheiratet, 3 Kinder: 

Es soll unter Berücksichtigung des Weihnachtsfreibetrages (2 : 400,— DM), des Arbeitnehmer- 
freibetrages (2: 480,— DM), der Pauschalbeträge für Werbungskosten (2 564,— DM) und 
Sonderausgaben (2: 240,— DM), des Tariffreibetrages (2 510,— DM) sowie der maximalen 
Vorsorgepauschale (2: 3150,— DM + n. ' 900,— DM), das zu versteuernde Einkommen, der 
Spitzensteuersatz, der Durchschnittssteuersatz und der Steuerbetrag ermittelt werden. 


Die Summe der abzugsfähigen Konstanten ist in dem Sekundärspeicher STO 9’ abgespeichert 
und kann dort ggf. verändert werden. Hat z.B. nur ein Ehegatte Einkünfte aus nichtselbst- 
ständiger Arbeit, so ist der Inhalt von STO 9’ um den halben Weihnachtsfreibetrag um den 
halben Arbeitnehmerfreibetrag, also um 440,— DM vor dem Programmstart zu verringern. 


Eingabe: 50 000 


Flag 1 löschen: 1] 
Start: [E] 


(1) Stop mit 0, Eingabe Anzahl Kinder: 3 
(2) kurze Pause: — 13 388 = Abzugsbetrag in DM 
Nach Betätigung der R/S-Taste kann der angezeigte Wert entsprechend dem individuellen 
absetzungsfähigen Betrag verändert werden. Nach wiederholter Betätigung der R/S-Taste 
wird das Programm fortgesetzt 
(3) kurze Pause: 18 300 = gerundeter nach dem Splitting-Verfahren zu versteuernder 
Einkommensbetrag in DM 


(4) lange Pause: 33,0 = Spitzensteuersatz in % 
(5) lange Pause: 19,3 = Durchschnittssteuersatz in % 
(6) Stop: 7 050,00 = Steuerbetrag in DM 


(7) Nach R/S: 42 950,00 = Nettobetrag in DM 
Rechenzeit rund 25 Sekunden 
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5.5.7 Änderungen für Einkommensteuer ab 1979 


Der zum Jahresende 1978 vom deutschen Bundestag verabschiedete und vom Bundesrat gebilligte 
Steuer-Kompromiß erfordert ab 1.1.1979 folgende Änderungen der Berechnungsgrundlagen zur 
tabellenfreien Ermittlung der Einkommensteuer: 

Die GI. (5.5.6) für den Steuerbetrag ist zu ersetzen durch: 


0 xs 3719 
0,22x - 812 3720<x<s 16019 
S*= {[(10,86y - 154,42) y + 925] y + 2200} y + 2708 16020<Sy<s 47999 (5.5.6a) 
{[(0,1z - 6,07) z + 109,95] z + 4800} z + 15298 48 000<Sz < 130 019 
0,56x - 13644 130 020 S x 


Die GI. (5.5.10) für den Spitzensteuersatz ist zu ersetzen durch: 


0% 
22% 

s = (10,86: Ay? - 154,42: 3y? + 925 2y + 2200) 10? % (5.5.10a) 
(0,1: 4z° - 6,07 32? + 109,95 * 2z + 4800) : 10? % 
56% 


Die hierzu in Tabelle 5.5.2 angegebene Anweisungsliste zur Berechnung der Einkommensteuer be- 
nötigt folgenden permanenten Datensatz: 


1978 1977 


1978 


ab 1979 


sToAi“ "022 0,22 sTo!': 0,56 0,56 0,56 
STO2: 812 660 sto?': 13644 12742 12676 
STO3: 48000 48000 sTo3': 130019| 130019| 130019 
STO4: 16019 16019 sTo4:? (5344) (5344) (4384) 
STOS5: 10,86 0 sTo5': 0,1 0,1 0,1 
STO6: -154,42|-492 |-492 STO6': - 6,07 - 6,07 - 6,07 
STOT: 9235 505,3 | 505,3 sTo?': 109,95 109,95 | 109,95 
STO8: 2200 3077 3077 sSTO8: 4800 4800 4800 
STO9: 2708 2792 2858 sTog: 15298 16200 16266 


N Diese Werte werden nur bei Berücksichtigung der Pauschalbeträge zur Ermittlung des zu versteuernden Ein- 
kommens benötigt (Programmvariante Clear Flag 1). 


Gegenüber dem Steuerprogramm für 1978 sind unter Berücksichtigung der strukturellen Überein- 
stimmung der Gleichungen für die Variable x in den beiden Proportionalbereichen und für die 
Variablen y und z in den beiden Progressionsbereichen einige Programmänderungen vorgenommen 
worden. Die Auswertung der Gleichungen für die Variable x wird ab Label 4 in den Programmzeilen 
150 bis 166 durchgeführt. Die gemeinsame Auswertung der Gleichungen für die Variablen x und y 
erfolgt ab Label 2 in den Zeilen 082 bis 117, für y mit dem aktivierten Primärspeicher und für z 
mit dem aktivierten Sekundärspeicher. 

Außerdem ist die Berechnung der Kirchensteuer eingearbeitet. Hierzu ist in Zeile 174 der jeweils 
gültige Hebesatz einzufügen. In der Anweisungsliste ist als Hebesatz 9 % eingefügt. Für die Ausgabe 
der Ergebnisse Spitzensteuersatz s, Durchschnittssteuersatz 5, Steuerbetrag S und Kirchensteuer- 
betrag S, ist die Anweisung zur Ausgabe aller Stack-Register in Zeile 177 vorgesehen. Dadurch 
ergibt sich ein verminderter Speicherbedarf von 186 Programmzeilen, so daß noch 38 Programm- 


104 


Tabelle 5.5.2 Anweisungsliste „„‚Einkommensteuerberechnung ab 1979' 


Start 6! »LEiEverh 863 
862 5Fö a64 
Bei __ETO8 865 

Start _ #64  »LBLe led. [133 
Ber CF& 867 
a6© LBLö 868 
ee7  DSPO 86° 
665 STOE a7& 
Bes STOC er 
alö RCLS 872 
61: a 873 
6iz i >674 
Bls #7? ers 
did P2S Br6 

IE Fi? 77 
sie | 6707 878 
8i7 i 878 
als F6? 886 
818 2 B81 
G26 | Rli4 a82 
B2i x B87 
622 | STO6 a84 
823 [7 885 
B24 R/S<P Kinder 685 
625 5 887 
[773 ö 888 
627 [7 883 
628 x 836 
625 | ST+6 651 
636 | RCLB 832 
631 cHS 893 
632 PSESDF<EF, 094 
677 | RELC 695 
634 + 895 
825 | STOC 897 
63€ \#LBL7 598 
837 F2 855 
838 3 166 

39 B 16i 
646  STO6 iBZ 
öl 1 103 
842 F6? 104 
643 2 105 
844 STOn 1ö& 
e4T  RCLC 167 
E45 RELA 168 
847 5 165 
ö48 INT 118 
843 5ST0I 111 
658  RCLS 112 

SI 837 113 
852 6T06 lid 
852 2 115 
854 STB lie 
855 &#LBL6 Ir 
85E  RCL4 up 113 
657 RELI 115 
658  RCLB 126 
855 3 up 412 
ö6E INT 122 
a6l RCLE 123 
d62 x 124 


STOD 125 N 
PSEEN iss IN 
Key? 127_ EEX 
ET 28 3 
RCL3 123 P 
xy? 136 __RIN 
5703 UP AIZI »LBle 
3 132 INT 
# 133  RCLA 
65Bd 134 x 
6702 135  STOR 
xLBL3 135  RELE 
ESBd 37 s 
P2S 1385 EEX 
RCL3 135 2 
RCLD 148 x 
87? 141 STOB 
ETO4— 142__RIN 
RELI UP 143 LBld 
*LBL2 144 - 
| RELS 145 EEX 
7 146 4 
| REL6 147 3 
| 6865 148 ST0I 
| REL? 145__RIN 
| 6555 UL 57597 aLBL4 
| ROLE 151 | RÜL 
65B5 il x 
| RcL3 153 | RCL2 
IR 154. = 
| 6886 155 | %8? 
| ReL5 156 | 6101 
14 171 8 
I x 158 | STOR 
| Reiz 159 | STOB 
ı x 168 | ET0a 
| 5T06 161 | #LBLl 
| RCLI is2 | 6586 
| x 163 | RcLI 
MIR 164 | EEX 
| RCLe 165 | 4 
I. 3 165 x 
I x 167 | xLBLa 
| RCLE 168 | EEX 
137 ie, 2 
|. *# 176 * 
| REL? 171 | sroc 
ji = :T2 | RELB 
I. 173 | RCLA 
j RELZ 14| 93 
ee; 1775| % S 
rt i7E | DSFZ |s 
RCLB 177 | PRST=D 
| + ie, + S 
L6Tda 175 | sron 1% 
#LBL5 188 | PRTA=> Sy 
+ isıl RS 
RCLI ıs2 | cHS 
XLBL 183 | ROLE 
x 14 | + 

EEX 185 | PRTÄ=D Ey, 
3 186 | RS 
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zeilen für individuelle Programmerweiterungen 2000 
zur Verfügung stehen. Die mit Hilfe des Pro- M 


in Bild 5.5.2 aufgetragen. 


verh. max. 1804 


gramms ermittelte Einkommensteuerersparnis 1500 | 
zwischen den Steuertarifen 1979 und 1978 ist | | 
| | 
7) us led. max. 902 
‚2 1000 Eee 
& | | 
50 
Bild 5.5.2 h 
Einkommensteuerersparnis Tarif 1979 0 20 40 60 80 100 120 140 TDM 


gegen Tarif 1978 


5.5.8 Testbeispiele ‚Tarif 1979' 


zu versteuerndes Einkommen —— 


IE Zu versteuernder Einkommensbetrag 30 000,— DM 


Start [e] für ledig: 


(1) 


(2) 
(3) 
(4) 
(5) 
(6) 
N 


kurze Pause: 


Anzeige bzw. Ausdruck (T): 
Anzeige bzw. Ausdruck (Z): 
Anzeige bzw. Ausdruck (Y): 


Anzeige bzw. Ausdruck (X): 


Stop bzw. Ausdruck: 
Nach R/S: 


Rechenzeit ca. 20 Sekunden 
Start [E] für verheiratet: 


(1) 


(2) 
(3) 
(4) 
(5) 
(6) 
(7) 


kurze Pause: 


Anzeige bzw. Ausdruck (T): 
Anzeige bzw. Ausdruck (Z): 


Anzeige bzw. Ausdruck (Y): 
Anzeige bzw. Ausdruck (X): 


Stop bzw. Ausdruck: 
Nach R/S: 


30 000 = gerundeter, zu versteuernder Einkommens- 
betrag in DM 
40,01 = Spitzensteuersatz in % 
24,06 = Durchschnittssteuersatz in % 
7 218,00 = Einkommensteuerbetrag in DM 
649,62 = Kirchensteuerbetrag in DM (Hebesatz 9 %)?) 
7 867,62 = Gesamtsteuerbetrag in DM 
22 132,38 = Nettobetrag in DM 


15 000 = gerundeter, nach dem Splitting-Verfahren zu 
versteuernder Einkommensbetrag in DM 
22,00 = Spitzensteuersatz in % 
16,59 = Durchschnittssteuersatz in % 
4 976,00 = Einkommensteuerbetrag in DM 
447,84 = Kirchensteuerbetrag in DM (Hebesatz 9 %)") 
5 423,84 = Gesamtsteuerbetrag in DM 
24 576,16 = Nettobetrag in DM 


2. Zu versteuernder Einkommensbetrag 60 000,— DM 


Start [f | [e] für ledig: 


(1) 


(2) 
(3) 
(4) 
(6) 
(6) 
(7) 
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kurze Pause 


Anzeige bzw. Ausdruck (T): 
Anzeige bzw. Ausdruck (Z): 


Anzeige bzw. Ausdruck (Y): 
Anzeige bzw. Ausdruck (X): 


Stop bzw. Ausdruck: 
Nach R/S: 


60 000 = gerundeter, zu versteuernder Einkommens- 
betrag in DM 
50,38 = Spitzensteuersatz in % 
35,34 = Durchschnittssteuersatz in % 
21 206,00 = Einkommensteuerbetrag in DM 
1 908,54 = Kirchensteuerbetrag in DM (Hebesatz 9 %)") 
23 114,54 = Gesamtsteuerbetrag in DM 
36 885,46 = Nettobetrag in DM 


Start [E] für verheiratet: 


1) 


(2) 
(3) 
(4) 
(5) 
(6) 
(N 


kurze Pause: 30 000 = gerundeter, nach dem Splitting-Verfahren zu 
versteuernder Einkommensbetrag in DM 

Anzeige bzw. Ausdruck (T): 40,01 = Spitzensteuersatz in % 

Anzeige bzw. Ausdruck (Z): 24,06 = Durchschnittssteuersatz in % 


Anzeige bzw. Ausdruck (Y): 14 436,00 = Einkommensteuerbetrag in DM 

Anzeige bzw. Ausdruck (X): 1 299,24 = Kirchensteuerbetrag in DM (Hebesatz 9 %)") 
Stop bzw. Ausdruck: 15 735,24 = Gesamtsteuerbetrag in DM 

Nach R/S: 44 264,76 = Nettobetrag in DM 


3: Bruttoeinkommensbetrag: 50 000,— DM, verheiratet, 3 Kinder 
Eingabe: 50 000 
Flag 1 löschen [11] bzw. 1] 


Start: [E] 


(1) 
(2) 


(3) 


(4) 
(6) 
(6) 
(7) 
(8) 
(9) 


Stop mit 0, Eingabe Anzahl Kinder: 3 

Kurze Pause: — 13 388 = Abzugsbetrag in DM 

Nach Betätigung der R/S-Taste kann der angezeigte Wert entsprechend dem individuellen 
absetzungsfähigen Betrag verändert werden. Nach wiederholter Betätigung der R/S-Taste 
wird das Programm fortgesetzt. 


kurze Pause: 18 300 = gerundeter, nach dem Splitting-Verfahren zu 
versteuernder Einkommensbetrag in DM 

Anzeige bzw. Ausdruck (T): 26,02 = Spitzensteuersatz in % 

Anzeige bzw. Ausdruck (Z): 17,81 = Durchschnittssteuersatz in % 

Anzeige bzw. Ausdruck (Y): 6 522,00 = Einkommensteuerbetrag in DM 


Anzeige bzw. Ausdruck (X): 586,98 = Kirchensteuerbetrag in DM (Hebesatz 9 %)") 
Stop bzw. Ausdruck: 7 108,98 = Gesamtsteuerbetrag in DM 
Nach R/S: 42 891,02 = Nettobetrag in DM 


Rechenzeit ca. 25 Sekunden 


1) Ohne Kinderfreibeträge bei der Kirchensteuerbemessung [50 DM + 80 DM + (nk - 2) : 150 DM mit ng > 2] 


120, — 
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6 Statistik 


6.1 Gaußsche Normalverteilung 


Die Gaußsche Normalverteilung [23—26] ist eine stetige Verteilungsfunktion mit der Dichte f(x): 


x? 
1 2 
f(x) = ee (6.1.1) 
v2ro 
! 
für -®o <x <% mit den Parametern u reell und o >0O. Man sagt die Zufallsgröße X ist (u, 0)- 
normalverteilt. Der Parameter u entspricht dem Erwartungswert und der Parameter o entspricht 
der Standardabweichung der Zufallsgröße. Die Standardabweichung ist gleich der Wurzel aus der 


Varianz. 
Für die Verteilungsfunktion F (x) einer (u, o)-normalverteilten Größe X gilt: 


X „ta 
1 202 


vV2ro 


-oo 


Fix) =w(x<sx) = dt (6.1.2) 


Der Wert des Argumentes der Verteilungsfunktion bei einer vorgegebenen statistischen Sicherheit S 
nennt man auch die P%-Fraktile der Zufallsgröße X (Bild 6.1.1a und 6.1.1b). 

In der Praxis interessiert bei normal verteilten Zufallsgrößen häufig nur die Wahrscheinlichkeit, 

mit der die Zufallsgröße X über oder unter einer Ao-Grenze, der Toleranzgrenze, liegt (Ausschuß- 
bereich gekennzeichnet durch das Merkmal A): 


u-Ao>X oder X>utrXo (6.1.3) 


1 12816 
—— x 90% Fraktile 


Bild 6.1.1 


a) Dichte der normierten Normalverteilung (u, o) = (0,1) 
b) Verteilungsfunktion der normierten Normalverteilung (x, 0) = (0,1) 


108 


Bild 6.1.2 
Wahrscheinlichkeitsdichte mit Ao-Grenzen 


Die Umkehrung dieser Ungleichung ergibt den Gutbereich (Merkmal A): 
MTAOSXSyurro (6.1.4) 


Die Wahrscheinlichkeit (statistische Sicherheit S) für das Vorhandensein des Merkmals A entspricht 
dann dem Flächeninhalt der Dichtefunktion in den Ao-Grenzen (Bild 6.1.2). 
Die Wahrscheinlichkeit für den Gut-Bereich ergibt sich zu: 


M+Ao kw? 
[® 20° (6.1.5) 


M-AO 


w(A) = 


1 
v2ro 
Für die Wahrscheinlichkeit für den Ausschußbereich gilt: 


w(A) =1-w(A) (6.1.6) 


6.1.1 Struktur des Programms ‚Normalverteilung‘ 


In dem Programm nach Tabelle 6.1.1 ist die Berechnung folgender Kenngrößen normal verteilter 
Elemente vorgesehen: 


Wahrscheinlichkeitsdichte f(u,0,x) Start 
Statistische Sicherheit mit 
einseitiger Begrenzung der S(u,0,x) Start 


Verteilungsfunktion 
Statistische Sicherheit mit 
zweiseitiger Begrenzung der S({u,0,%o,Xu) Start 
Verteilungsfunktion 
Zweiseitig begrenzte 

a ae Baia, 0) “lat D] 
Einseitig begrenzter 
Vertrauensbereich 


u (4, 0,5) Start [E] 


Die Anweisungsliste zu dem Programm ist in Tabelle 6.1.1 angegeben. Für die Argumente der 
Funktionen sind die Eingabespeicher bei allen Varianten einheitlich zugeordnet: 


Erwartungswert Ak in STOA 
Standardabweichung o in STOB 
Obere Integrationsgrenze x, in STOC 
Untere Integrationsgrenze x, in STOD 
Statistische Sicherheit S in STOE 
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Tabelle 6.1.1 Anweisungsliste ‚„‚Gaußsche Normalverteilung’ 


fix) ai »LBiä 
dd: cFi 
665 656 
664 6Sbe 
665 __6T03 
s(x) 665 __&LBLB 
887 cf 
565 CF2 
665 6 
6iö RLLE 
dil 65Bd 
6i2 STO6 
813 &i8? 
814 6TÜl 
615 5STOI 
dit + 
6i7 5703 
615 Sri 
819 6102 
026 xLBLi 
621 5T03 
822 Key 
823 z 
624 STOI 
825 xLBL2 
#26  RiL3 
627 _ RCLI 
625 6701 
SW%o.x ) 628 #LBLC 
638 CFi 
831 CF2 
832  RCLC 
833 65Bd 
634  ST03 
835 RCLD 
636 65Bd 
637 _ 5701 
635 &Ldli 
633 - 
646 STOO 
641  RELI 
64288? 
843 67105 
044 1 
645 8 
646 STOI 
847 &LBL5 
645 « 
843 2 
656 RCLB 
051 RELI 
852 * 
053 Ar? 
054  6T01 
655 RCLI 
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D 


855 2 1i1 6701 
073 
6586  5T0I 113 CFö 
655 6705 114 «LBii 
868 xLBLi 115 CFi 
661 STO6 llö [) 
62 DSZI 117 5T03 
663 RüLI 118 r 
664  65Be 115 5 
865 ST02 126 RCLE 
866 xLBL& 121 EEX 
867 RLLB 122 2 
85 ST+l 123 * 
89 RCLI 124 A<£r? 
878 65Be 125 6701 
[721 2 126 1 
872 F2? 127 - 
873 6701 125 CHS 
874 R+ 125 Sri 
675 4 136 sLBLi 
876 $F2 131  5T06 
677 sLBli 132 2 
878 x 133 F8? 
679  5T+2 134 5T:6 
668 DSZI 135  RCLO 
61 6708 156 2 
662  RCL3 137 Fi 
0863 65Be 138 A 
864  ST+2 139 A 
685 RÜL2 146 Ä 
666 RLLB 141 $STOD 
687 x i42 > 
688 3 143 CHS 
863 + 144 ST0i 
896 xLBiL3 145 65Be 
631 2 146 5TO02 
892 Pi 147 . 
893 x 148 8 
694 A 145 5 
695 * 156  5TO8 
896 i 151 4 
897 er 152  $T0I 
898 Fi? 153 »LBL4 
899 = 154  RCLO 
188 PRTI=DFIK),SIX) 155  ST+i 
161 SPC 156 RLLI 
182 RS 157 65Be 
163 1 1586  RCL2 
184 - 159 er 
165 cHS i66 STOZ 
186 PRTS=DI-fix) 161 + 
187 SPC 162 2 
186 R-S 

116 77 


UP 


UP 


In dem Programm wird für die Berechnung der Normalverteilung die normierte Form einer (0,1)- 
Verteilung zugrunde gelegt. Hierzu wird in dem Unterprogramm Label d die Substitution: 
xXTH 


1 (6.1.7) 


vorgenommen. 
In dem Unterprogramm Label e wird die normierte Form der Normalverteilung ausgewertet: 


GlW)=-— |e ?d (6.1.8) 


6.1.2 Programmbeschreibung „Normalverteilung‘ 


1. Einzelwahrscheinlichkeit 


Die Anfangsadresse Label A des Programms zur Berechnung der Einzelwahrscheinlichkeiten gemäß 
GI. (6.1.1) bildet die erste Programmzeile. Als Argument der Funktion f(x) wird der Inhalt des 
X-Registers übernommen. Das in diesem Programmteil nicht benötigte Flag 1 wird zurückgesetzt. 
Durch den Aufruf des Unterprogramms Label d wird die Substitution nach GI. (6.1.7) der Zufalls- 
variablen x vorgenommen. In dem Unterprogramm Label e wird mit dem Inhalt des X-Registers 
der Wert der e-Funktion e” x2/2 gebildet. Nach dem unbedingten Programmsprung auf Label 3 in 
Zeile 090 wird der endgültige Wert der Einzelwahrscheinlichkeit gebildet und als Ergebnis in Zeile 
100 ausgegeben. 


2. Statistische Sicherheit für einseitig begrenzte Intervalle 


Ein Maß für die statistische Sicherheit ist der Flächeninhalt unter der Funktionslinie für die Wahr- 
scheinlichkeitsdichte. Nach Eingabe eines Wertes für die obere Grenze des Vertrauensbereiches mit 
der gesuchten statistischen Sicherheit S; , d.h. für die rechtsseitige Grenze (Fraktile) des bei - 
beginnenden Integrationsbereiches, kann das Programm über Label B in Zeile 006 gestartet wer- 
den. Mit der Abfrage x <O in Zeile 013 wird festgestellt, ob die substituierte Variable u im rech- 
ten oder linken Quadranten der normierten Normalverteilung liegt. Liegt diese im rechtsseitigen 
Bereich, so wird in den Zeilen 015 bis 018 die untere Grenze in STO 1 und die um 6 Einheiten 
größere obere Grenze in STO 3 abgespeichert. Liegt die substituierte Variable u im linksseitigen 
Bereich, so wird die untere Grenze um 6 Einheiten niedriger angesetzt. Damit werden anstelle der 
Integrationsgrenzen +% programmtechnisch die Ersatzgrenzen +6 eingesetzt. Alle Funktions- 
werte G(u) außerhalb des Intervalls -6 <u <6 sind kleiner als 1,523: 10°® und konvergieren 
gegen Null. Der Flächeninhalt der Verteilungsdichte von -& bis -6 ist kleiner als 5° 19°? und 
kann gegen Werte für die statistische Sicherheit bis zur Größenordnung 10°” vernachlässigt wer- 
den. Dies gilt umsomehr, da das angewandte numerische Integrationsverfahren in Form der Simp- 
son-Regel eine Fehlerordnung mit der fünften Potenz der Schrittweite bringt. 

In den Zeilen 041 bis 046 wird der Inhalt des Indexregisters und damit die Anzahl der numerischen 
Integrationsintervalle gleich 10 gesetzt, falls nicht schon ein Wert größer Null über die Tastatur in 
STO I eingegeben wurde. Anschließend wird in den Zeilen 047 bis 053 geprüft, ob die Intervall- 
breite den Wert 0,2 übersteigt. Falls dies zutrifft, wird die Schrittzahl verdoppelt und die Prüfung 
solange wiederholt, bis die Bedingung erfüllt ist. 
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Mit dem endgültigen Inhalt des Indexregisters ist die Anzahl der Integrationsschritte nach Simpson 
festgelegt. Die numerische Simpson-Integration wird in der Programmschleife zwischen Label O in 
Zeile 066 und der Rücksprunganweisung GTO O in Zeile 081 durchgeführt. 

Das Ergebnis wird in Zeile 100 ausgegeben. Nach Betätigung der R/S-Taste wird auch die Wahr- 
scheinlichkeit des komplementären Ereignisses ausgegeben. Die Genauigkeit der Rechnung liegt 
bei interner Vorgabe der Schrittweite etwa bei 107% 


3. Statistische Sicherheit für beidseitig begrenzte Intervalle 


Zur Berechnung der statistischen Sicherheit für beidseitig begrenzte Intervalle ist die Startadresse 
Label C in Zeile 029 vorgesehen. Im Gegensatz zur Berechnungsweise bei einseitiger Begrenzung 
wird hier in jedem Fall über das vorgegebene innere Intervall integriert. Dadurch ist keine Abgren- 
zung nach +& erforderlich. Nach Berechnung der normierten Integrationsgrenzen in den Zeilen 
032 bis 037 wird ab Label 1 in Zeile 038 der vorher erläuterte Programmteil abgearbeitet. 

Die Genauigkeit bei diesem Verfahren wird hier lediglich durch die Wahl der Schrittweite bestimmt. 
Bei der gesetzten Standardschrittweite liegt sie bei 10°*, Bei Eingaben von Schrittweiten über 10 

in STO I muß dies vor jedem Programmstart wiederholt werden, da die Dekrement-Steuerung das 
Indexregister programmgemäß auf Null bringt. 


4. Toleranzintervall für zweiseitige Begrenzung 


Die Begrenzung der Intervallgrenzen bei vorgegebener statistischer Sicherheit führt zu einem itera- 
tiven Lösungsverfahren, bei dem eine Intervallgrenze durch Herantasten gefunden werden muß. Die 
hierzu vorgesehene Programmvariante wird mit Label D in Zeile 109 gestartet. 

Über die Abfrage in Zeile 124 wird festgestellt, ob der in STO E bereitgestellte Wert der statistischen 
Sicherheit über 50 % liegt. Falls dies der Fall ist, wird in STO O der kleinere Wert für die statistische 
Unsicherheit als Vergleichswert für das Auffinden der Integrationsgrenze abgespeichert. Das Flag 0 
wird als Unterscheidungsmerkmal für die zweiseitige oder einseitige Begrenzung abgefragt. Die un- 
tere Integrationsgrenze wird in den Zeilen 142, 143 gleich —-5 gesetzt. Als numerisches Integrations- 
verfahren wird die Trapezregel mit der Schrittweite 0,05 angewendet. Innerhalb der Programm- 
schleife zwischen Label 4 in Zeile 153 und der Rücksprunganweisung GTO 4 in Zeile 174 werden 
die Flächeninhalte der Trapezstreifen in STO 3 aufaddiert. Da der letzte Streifen im allgemeinen 
über die vorgegebene Schranke in STO D hinausragt, wird diese Addition in den Zeilen 170 bis 173 
zunächst wieder rückgängig gemacht. Dann wird die Streifenbreite auf ein Zehntel verringert und 
wieder in die Programmschleife zurückgesprungen. Dieser Vorgang wird mit dem Indexregister ge- 
steuert und 3 mal wiederholt, so daß die letzte Streifenbreite im ungünstigsten Fall um 0,5 10°? 
an die vorgegebene Grenze herangeführt wird. 

Als Ergebnis wird das Toleranzintervall in Zeile 186 ausgegeben. Nach Betätigung der R/S-Taste 
wird jeweils die obere und untere Toleranzgrenze angegeben. 

Die Genauigkeit des Verfahrens beträgt bei der intern gesetzten Schrittweite von 0,05 rd. 1° 10° 
bei Rechenzeiten bis zu 3 Minuten. 


5. Einseitige Toleranzgrenze 


Die Berechnung der einseitigen Toleranzgrenze wird mit LBLEE in Zeile 112 gestartet. Hierbei ist 
das Flag O gelöscht. Die gleiche Toleranzgrenze führt bei einseitiger Begrenzung zum halben Wert 
der statistischen Unsicherheit. 

Als Ergebnis werden das einseitige Toleranzintervall in Zeile 186 und nach Betätigung der R/S- 
Taste die einseitige Toleranzgrenze in Zeile 192 ausgegeben. 
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6.1.3 Anwendungsbeispiele ‚„Normalverteilung‘‘ [27] 


R 


Aus einer normalverteilten Grundgesamtheit mit dem Erwartungswert der Meßwerte u = 50 
und der Standardabweichung o = 0,5 liegen folgende Meßwertproben vor: 


x%ı = 50,2 X” 49,8 
X = 50,4 %5 49,2 
%3 = 50,1 xg=49,6 


a) Zu den einzelnen Meßwerten sollen die statistischen Einzelwahrscheinlichkeiten bestimmt 
werden. 

b) Mit welcher statistischen Sicherheit wird der Meßwert x, noch unterschritten? 

c) Mit welcher statistischen Sicherheit liegen die Meßwerte innerhalb des Toleranzintervalls 
50 + 0,2? 

d) Welches Toleranzintervall liegt einer statistischen Sicherheit von 99 % zugrunde? 

e) Wie weit ist die einseitige Toleranzgrenze (Fraktile) bei der statistischen Sicherheit von 
99 % ausgedehnt? 


Eingaben: 50 STO A Erwartungswert 
0,5 STO B Standardabweichung 


Ergebnisse: 

a) Berechnung der Einzelwahrscheinlichkeiten 
50,2 Start [A]: w(x,) =0,368= 36,8% 49,8 Start [A]: w(x,) = 0,368 = 36,8 % 
50,4 Start [A]: w(x2) = 0,290 = 29,0 % 49,2 Start [A]: W(X5) = 0,111 = 11,1% 
50,1 Start [A]: w(x3) = 0,391=39,1% 49,6 Start [A]: w(xg) = 0,290 = 29,0% 
Rechenzeit je Wert rund 3 Sekunden 

b 


Statistische Sicherheit für X = %s 
Eingabe: 49,2 STOC obere Grenze des Vertrauensbereiches (Integrationsgrenze) 
Start [B]: S(xs) = 0,055 = 5,5 % 
Rechenzeit rund 90 Sekunden 
Statistische Sicherheit für 49,8 X S50,2 
Eingaben: 50,2 STOC obere Toleranzgrenze 
49,8 STO D untere Toleranzgrenze 
Start [C]: S(xo. x.) = 0,311 = 31,1% 
Rechenzeit rund 30 Sekunden 
Toleranzintervall für S= 99% 
Eingabe: 99STO E zweiseitig begrenzte statistische Sicherheit 
Start [0] : Ax = + 1,288 Toleranzintervall 
Nach R/S: x. = 51,288 obere Toleranzgrenze 
Nach R/S: x, = 48,712 untere Toleranzgrenze 
Rechenzeit rund 160 Sekunden 
Einseitige Toleranzgrenze für S= 99% 
Eingabe: 99 STOE rechtsseitig begrenzte statistische Sicherheit 
Start [E]: Ax = 1,164 
Nach R/S: x = 51,164 
Rechenzeit rund 160 Sekunden 


c 


d 


e 
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2. Der Widerstandswert einer produzierten Widerstandsserie sei eine normal verteilte Zufalls- 
größe mit dem Erwartungswert u = 1000 S2 und der Standardabweichung o = 50 2. Alle 
Widerstandswerte, die nicht in dem Toleranzbereich 1000 2 # 10 % fallen, sind als Aus- 
schuß anzusehen. 

a) Wie groß ist die statistische Sicherheit für das Auftreten von Ausschuß? 
Eingaben: Erwartungswert u = 1000 STO A 
Varianz o= 50 STOB 
Obere Toleranzgrenze x, = 1100 STOC 
Untere Toleranzgrenze x, = 900 STOD 


Start [e]: Statistische Sicherheit für die Einhaltung der Toleranzgrenzen 
Ergebnis: S(Gut) = 0,954 = 95,4% 

S(Ausschuß) = 1 - w(Gut) = 0,046 = 4,6 % 
Rechenzeit rund 30 Sekunden 


b) In welchem Toleranzbereich sind 30 % der Widerstandswerte zu erwarten? 
Eingabe: 30 STO E zweiseitig begrenzte statistische Sicherheit 
Start [D]: Zweiseitiger Toleranzbereich R = + 51,840 0 = +5,184 % 
Nach R/S: R, = 1051,84.0 
Nach R/S: R, = 948,160 
Rechenzeit rund 160 Sekunden 


3. Der Durchmesser von Drehteilen sei normalverteilt mit u = 50 und o = 0,5. Die Toleranz- 
grenzen betragen 50 + 1. Gesucht ist die statistische Sicherheit für das Produktionsergebnis 
im Toleranzbereich. 
Eingaben: 50 STOA 


0,5 STOB 

51 STOC 

49 STOD 
Start [ec]: Statistische Sicherheit 
Ergebnis: S (Gut) = 0,954 = 95,4% 


Nach R/S: S (Ausschuß) = 0,046 = 4,6 % 
Rechenzeit rund 30 Sekunden 


6.2 Binominalverteilung 


Eine für die praktische Anwendung grundlegende diskrete Verteilung ist die binomische Vertei- 
lung. Die binomische Verteilung gilt für Zufallsereignisse, die nur die komplementären Zustände 
A und A mit den Wahrscheinlichkeiten w(A) = p und w(A)=1-p=q zur Folge haben können. 
Dabei ist die Wahrscheinlichkeit, daß das Ereignis A bei n unabhängigen Proben genau k-mal auf- 
tritt, gegeben durch: 


ra Anl, k > n=k = n k.n-k 
wi np p) (R )p*a (6.2.1) 


fürk=0,1,...,n. (0! ist gleich 1 zu setzen.) 
Bei der Berechnung aufeinanderfolgender Einzelwahrscheinlichkeiten w(k) ist die Anwendung 
einer Rekursionsformel zweckmäßig: 


n-kp 


ee 


w(k) (6.2.2) 
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Für die Verteilungsfunktion F (m) einer Binominalverteilung gilt: 


Eimi= S Han 2 (6.2.3) 


k=0 


F (m) ist die Wahrscheinlichkeit dafür, daß bei 0, 1,2,..., m Ereignissen der Zustand A mit 

w(A) = p eintritt. 

In der Praxis interessiert häufig der Fall, bei dem für eine vorgegebene statistische Sicherheit S der 
minimale Wert von m für den Zustand A zu bestimmen ist: 


m 
Fim) = S (K)p*ar=* >s (6.2.4) 
k=0 
Es läßt sich zeigen, daß die binomische Verteilung mit dem Erwartungswert np und der Varianz 
npq für np>4 und ng >4 durch eine (np, „/npg)-Normalverteilung angenähert werden kann. 


6.2.1 Vertrauensgrenzen von Hypothesen 


Bei Serienfertigungen gleichartiger Teile in großen Losen ist es wichtig, aufgrund einer Stichprobe 
ein Vertrauensintervall für den prozentualen Ausschußanteil der Serie angeben zu können. 

Hierzu wird der Grundgesamtheit eine Stichprobe vom Umfang n entnommen. Die Grundgesamt- 
heit besteht aus Elementen, die entweder die Eigenschaft A(Gut) oder die Eigenschaft A (Ausschuß) 
ausweisen. Enthält die Stichprobe m Elemente mit der Eigenschaft A (Ausschuß), so lassen sich die 
Vertrauensgrenzen für die unbekannte Ausschußwahrscheinlichkeit p unter der Voraussetzung be- 
stimmen, daß die binomische Verteilung hinreichend genau durch die Normalverteilung angenähert 
werden kann. Dies ist der Fall, wenn bei n-maliger Wiederholung des Bernoulli-Experimentes, d.h. 
das Mischungsverhältnis der Grundgesamtheit bleibt praktisch konstant, m>4 undn-m>4 gilt. 
Dies bedeutet für die binomische Verteilung, daß diese mit np >4 und ng > 4 durch eine 

(np; \/npg)-Normalverteilung ersetzt werden kann. Bezeichnet man mit X die Grenze des zwei- 
seitigen Vertrauensintervalls, mit der statistischen Sicherheit S>, so gilt für die Ausschußwahrschein- 
lichkeit p: 


a un 


n+22 


2 / 2 
nn Im+ + m (1-4 | (6.2.5) 
n 


Die Grenze X (S,) des zweiseitigen Vertrauensintervalls entspricht der einseitigen Fraktile X(S;) 
einer (0; 1)-Normalverteilung bei S; = 5 (100% + S2). 


6.2.2 Struktur des Programms „Binominalverteilung‘ 


In dem Programm ist die Berechnung folgender Kenngrößen binominal verteilter Elemente vor- 
gesehen: 


Einzelwahrscheinlichkeit w(p,n,k) Start 
Summenwahrscheinlichkeit F(p,n,k.,m) Start 
Obere Grenz-Ausfallzahl mo (P, N, ko, Sı) Start 
Untere Grenz-Ausfallzahl mu(Pp,n, ko, Sı) Start 
Vertrauensbereich p(n,m,X(S>)) Start [o] 
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Die Anweisungsliste zu dem Programm ist in Tabelle 6.2.1 angegeben. 
Für die Argumente der Funktionen sind folgende Speicher vorgesehen: 


Ausfallwahrscheinlichkeitp inSTOA 


Anzahl der Elemente n inSTOB 
Grenz-Ausfallzahl m inSTOC 
Statistische Sicherheit 

für zweiseitig begrenzten inSTOD 


Vertrauensbereich S, 

Statistische Sicherheit 

für einseitig begrenzten inSTOE 

Vertrauensbereich S} 
Den Eingabewert des Startpunktes für die Bildung der Summenwahrscheinlichkeit stellt der Wert 
im X-Register vor dem Programmstart dar. 


6.2.3 Programmbeschreibung „Binominalverteilung’ 


1. Einzelwahrscheinlichkeit 


Das Programm für die Berechnung der Einzelwahrscheinlichkeit w(k) nach GI. (6.2.1) beginnt in 
Zeile 001 mit der Anfangsadresse Label A. Bis zum Eintritt in die Programmschleife in Zeile 025 
mit Label 4 werden Vorbereitungsanweisungen wie Flag O löschen und Speicher löschen getroffen. 
Der beim Programmstart im X-Register vorgegebene Wert k wird in Zeile 028 in einer kurzen Pause 
angezeigt. Anschließend wird p“q” "* gebildet und nach STO 1 abgespeichert. Mit dem Unterpro- 
gramm Label a in Zeile 039 wird die Berechnung des Binominalkoeffizienten (K) eingeleitet. Auf 
die Programmierung der Rekursionsformel nach Gl. (6.2.2) wurde verzichtet, da beliebige untere 
Grenzen für die Berechnung der Binominalkoeffizienten zulässig sein sollen. Da das Flag O für die 
Variante A nicht gesetzt ist, wird das Programm mit der Ausgabe der Einzelwahrscheinlichkeit in 
Zeile 045 beendet. 


2. Summenwahrscheinlichkeit 


Die Berechnung der Summenwahrscheinlichkeit wird über Label B in Zeile 004 gestartet. Als Merk- 
male wird Flag O gesetzt und Flag 1 gelöscht. Bis zur Zeile 042 verlaufen beide Rechnungsvarianten 
w(k) und F(m) gleichartig. Ab Label 3 in Zeile 046 wird geprüft, ob die obere Grenze noch nicht 
erreicht ist. 

Zur Ausgabe kommen in zyklischem Ablauf die Anzeigen der Ausfallzahl k in Zeile 028 und der 
Funktionswert F(m) in Zeile 049. Nachdem die letzte Einzelwahrscheinlichkeit für k = m auf- 
addiert wurde, werden als Endergebnisse der Startwert für k in Zeile 060, der Endwert für k in 
Zeile 064 und die Summenwahrscheinlichkeit als Dezimalwert in Zeile 067 ausgegeben. Für die 
Berechnung der Summenwahrscheinlichkeiten kann in einem speziellen Programm durch Anwen- 
dung der Rekursionsformel nach GI. (6.2.2) die Rechenzeit erheblich reduziert werden. 


3. Grenz-Ausfallzahl 


Die Berechnung der Grenz-Ausfallzahl wird über Label C in Zeile 011 gestartet. Der Unterschied 
gegenüber dem Programmablauf für die Summenwahrscheinlichkeit liegt lediglich in einer durch 
den Zustand von Flag 1 in Zeile 052 bewirkten veränderten Abfrage. Ist Flag 1 gesetzt, so wird in 
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Tabelle 6.2.1 Anweisungsliste „Binominalverteilung‘ 


wip.n.k) 681 ALBia 057 
862  CFB 858 
6632 6703 055 

Finl 064 Ibis] 686 
665  SF8 661 
s66 Cr 862 
Be? 6703 63 

864 
6635  $F2 665 
Bi6 _6TO 666 

667 
612  CF2 865 
613 ALBL2 O—863 
614 SF 876 
615 Sr 671 
616 ALBL3 672 
617 5T0Or 673 
618  STO6 874 
6is ö 75 
626  STO5 76 
621 1 77 
622  RCLA 878 
823 - [2 
624  STO& 868 
625 uLBL4 881 
625 RCLA 662 
627 RÜLE 863 
628 PSE=Dk 684 
825 yx 685 
638 RCLB UP 886 
631 RÜLB 867 
632 RLLS 888 
633 - 885 
634 yx 898 
635 x 891 
635 STOI 892 
637 RCLE 893 
638  RCLB 894 
639 65Ba 835 
648 STAI 895 
641 RCLI 697 
642 FB? 898 
643 6703 655 

[ PRTÄ=Dw 188 
645 RS 161 
le646 #LBL3 182 
647 5T+5 183 
648 RCL5 184 
645 FSE=DFim | 185 
856 1 186 
651 ST+6 187 
652 Fi? 188 
6535 6T05—G) 183 
654 RELC 118 
655 RELE li 
056  A£r? 112 


6TO4 
LBL6 
REL? 
PRTX=>Ko 


1 p(S) 


ST-6 
RCL& 
PRTA=Dm 
SPC 
RCLS 
PRTA=DF(m) 
R’S 
&LBLS5 
RCLE 
EEX 


RCL3 UP 


113 6701 
114 #LBL3 
115 RCL4 
116 RTN 
17 xLBLD 
118  655d 
113 Ä2 
126 5T08 
121 4 
122 ® 
125 | 
124  RCLC 
125  RCLB 
126 s 
127 - 
125 RCLC 
128 x 
136 + 
131 TK 
132 RCLI 
133 x 
134 STO2 
135  RCLB 
136 r3 
137 ® 
136  RCLC 
135 + 
146  5T03 
14i + 
142 RCLE 
143 RCLB 
144 + 
145 5T04 
146 + 
147 PRTS=DPy 
146 RCL3 
143 RCLZ 
156 = 
I5i  RÜL4 
152 = 
153 FRTA=DPo 
154 R-S 
155 xLBLd 
156 EEX 
157 2 
158 RCLD 
159 = UP 
166 & 
iel ® 
162 EEX 
163 2 
164 * 
165 2 
165 Fi 
16er x 
168 ‘X 
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Zeile 075 die aufaddierte Summenwahrscheinlichkeit mit dem Inhalt von STO E verglichen und 
damit bei F(m,) >S} die Rechnung beendet. 

Als Endergebnisse werden wieder der Startwert für k in Zeile 060, der Endwert für k in Zeile 064 
und die Summenwahrscheinlichkeit als Dezimalwert in Zeile 067 ausgegeben. 

Bei Programmstart über Label c wird auf die letzte Summenwahrscheinlichkeit unterhalb der in 
STO E vorgegebenen statistischen Sicherheit S; abgefragt F(m,) > S;. Mit den beiden Ergebnis- 
sen aus Start C und Start c kann der Gewinn an statistischer Sicherheit durch den letzten Rechen- 
schritt von k = m, bis k= m, + 1 = m, bewertet werden. 


4. Vertrauensbereich 


Die Berechnung des Vertrauensbereiches der Wahrscheinlichkeit p(A) wird über Label D in Zeile 
117 gestartet. Es wird vorausgesetzt, daß die Bedingungen für die Approximation der Binominal- 
verteilung durch die Normalverteilung (m>4 undn -m >4) erfüllt sind. In dem Unterprogramm 
Label d wird zu der in STO D abgelegten statistischen Sicherheit S> für zweiseitige Begrenzung die 
Fraktile X bestimmt und in Zeile 212 ausgegeben. Mit diesem Wert X wird der Vertrauensbereich 
für die Wahrscheinlichkeit p gemäß GI. (6.2.5) berechnet und in den Zeilen 147 und 153 ausge- 
geben. 


6.2.4 Anwendungsbeispiele 


T. In einem Energieversorgungssystem sind n = 200 Kraftwerksblöcke mit der Ausfallwahrschein- 
lichkeit p = 3% an der Energiebereitstellung beteiligt. 
a) Mit welcher Wahrscheinlichkeit tritt der Erwartungswert auf, bei dem pn = 6 Blöcke aus- 
fallen? 
b) Wie groß ist die Wahrscheinlichkeit dafür, daß höchstens 10 Blöcke gleichzeitig ausfallen? 
c) Mit welcher Block-Ausfallzahl muß bei einer statistischen Sicherheit von S = 99 % gerech- 
net werden (oberer und unterer Grenzwert der Block-Ausfallzahl für S= 99 %)? 


Ergebnisse: 
a) Einzelwahrscheinlichkeit für k = 6 
Eingaben: 0,03 STO A Ausfallwahrscheinlichkeit p 
200 STO B Blockzahl n 
6 im X-Register als Ausfallzahl 
Start [A]: Einzelwahrscheinlichkeit für den Erwartungswert &E= np 
w(6) = 0,163 = 16,3 % 
Rechenzeit rund 20 Sekunden 
b) Summenwahrscheinlichkeit für maximale Ausfallzahl m = 10 
Eingaben: 10 STOC maximale Ausfallzahl 
0 im X-Register als Startwert der möglichen Zustände 
Start [e]: Summenwahrscheinlichkeit für k S 10 
w(k < 10) = 0,960 = 96 % 
Rechenzeit rund 3 Minuten 
c) Ausfallzahl bei vorgegebener statistischer Sicherheit (oberer Grenzwert) 
Eingaben: 99 STOE Sollwert der statistischen Sicherheit S, in Prozent 
0 im X-Register als Startwert 
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Start [ec]: Erfaßte Ausfallsituationen k = Obisk = 12 bei der statistischen Sicherheit 
(Istwert) S; = 0,992 = 99,2 %. Während der Rechnung wird in kurzen Pausen 
die jeweilige Ausfallzahl und die Summenwahrscheinlichkeit angezeigt. 

Rechenzeit rund 3 Minuten 

Ausfallzahl bei vorgegebener statistischer Sicherheit (unterer Grenzwert) 

Start [e] : Erfaßte Ausfallsituationen k = Obisk = 11 bei der statistischen Sicherheit 

Sı = 0,982 = 98,2 % 

Rechenzeit rund 3 Minuten 

Anwendungsbeispiele ‚„‚Vertrauensbereich‘' 

Aus einer Fertigungsserie Kondensatoren wurden 200 Stück zufallsmäßig entnommen. Unter 

diesen befanden sich 50 Stück, deren Kapazitätswert außerhalb der Toleranz lag. Gesucht ist 

das 95 %-Vertrauensintervall für den Ausschußanteil p in der Gesamtmenge. 

(Die Voraussetzungen für die Anwendbarkeit der binomischen Verteilung seien erfüllt 

(m>4undn-m>4).) 

Eingaben: n=200 STOB 

m= 50 STOC 
S-=- 95 STOD 

Start [D] : Berechnung der unteren und oberen Grenze des Ausschuß-Anteils bei 95 %-Ver- 
trauensbereich 

Ergebnisse: untere Grenze p, = 0,195 = 19,5 % 
obere Grenze p, = 0,314 = 31,4% 

0,195 Sp <S 0,314 

Rechenzeit rund 160 Sekunden 

Erweiterung des Vertrauensbereiches auf 99 %: 

Eingabe: 99 STOD 

Start [D]: 0,181 <p< 0,335 

Rechenzeit rund 160 Sekunden 

Bei einer Umfrage über den Bekanntheitsgrad eines Gebrauchsartikels wurden n = 300 Ver- 

braucher befragt. Davon kannten 40 % den Artikel. 

Gesucht ist das 99 %-Vertrauensintervall für den Bekanntheitsgrad p des Artikels. 

Eingaben: n=300 STOB 

m = 120 STOC (40 % von 300) 
S= 99 STOD 

Start [o] : Grenzen des 99 %-Vertrauensbereiches 

Ergebnis: Obere Grenze p, = 0,330 = 33,0 % 
Untere Grenze p, = 0,474 = 47,4% 


0,330 <p< 0,474 
Rechenzeit rund 3 Minuten 


In einer Weberei soll das Ausmaß der durch Fadenbrüche verursachten Stehzeiten der Web- 
automaten nach der Einführung eines neuen Kettgarns überprüft werden. Bei 18 Kontroll- 
gängen wurde an den 30 Webautomaten 35 Stillstände durch Fadenbrüche beobachtet. Nach 
Angaben des Kettgarnlieferanten soll die mittlere relative Stillstandszeit durch Fadenbrüche 
bei dem neuen Kettgarn bei 4 % liegen [23]. 

Es ist zu prüfen, ob die beobachteten Stillstände bei einer statistischen Sicherheit von 95 % 
mit den Angaben des Kettgarnherstellers verträglich sind. 
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Die Grundgesamtheit der Beobachtungen wird aus 18 Kontrollgängen an 30 Webautomaten 
zu n = 540 gebildet. Die Stillstandswahrscheinlichkeit jedes Automaten soll 4 % betragen, 
d.h. p = 0,04. Es ist zu prüfen, ob die Zahl der festgestellten 35 Stillstände bei einer stati- 
stischen Sicherheits von S; = 95 % unter- oder überschritten wird. 
Eingaben: 0,04 STO A 

540 STOB 

95 STOE 
im X-Register als Startwert 


0 
Start [le] : Als Ergebnis wird ausgegeben, daß bis zu einer statistischen Sicherheits- 
grenze von 95 % nur maximal 28 Automaten stillstehen durften: 
n. =0 
ng = 28 zulässige Ausfallgrenze 
S, = 0,930 = 93,0 % 
Rechenzeit rund 11 Minuten 
Berechnet man die Ausfallzahl, bei der die statistische Sicherheit von 95 % mindestens er- 
reicht wird (Start C), so ergibt sich eine zulässige Ausfallgrenze von ng = 29 bei S, = 95,34 %. 
Zusätzlich kann man aus dem Beobachtungsergebnis das 90 %-Vertrauensintervall für die Still- 
standswahrscheinlichkeit ermitteln: 
Eingaben: 540 STO B Gesamtheit der Beobachtung 
35 STOC beobachtete Ausfälle 
90 STOD S, = 2S, - 100% 
Start [o]: Nach Angabe des Fraktilenwertes X = 1,645 für die zweiseitige Begrenzung mit 
S2 = 90 % werden die Vertrauensgrenzen ausgegeben: 


0,049<p<0,085 oder 4,9% <Sp<s85% 
Rechenzeit rund 4 Minuten 
Als Ergebnis ist also festzustellen, daß die Angaben des Kettgarnherstellers zup = 4% für das 
neue Kettgarn nicht zutrifft, da mit einer statistischen Sicherheit von 90 % der Wert für p 
zwischen 4,9 und 8,5 % liegt. Die Wahrscheinlichkeit, daß die Stillstandserwartung unter 
4,9 % bleibt, ist demnach kleiner als 5 %. 
Für S, = 50 % liegt p in dem Vertrauensbereich von 5,8 % bis 7,2 %. 


6.3 Klassifizierung durch Stichproben 


Um aus einer statistisch verteilten Grundgesamtheit wahrscheinlichkeitstheoretische Klassifizierun- 
gen für ein durch die stochastische Veränderliche X gekennzeichnetes Merkmal treffen zu können, 
entnimmt man der Grundgesamtheit nach dem Zufall eine Stichprobe vom Umfang n. Für die 
Variable X ergeben sich dabei n Werte x, bis x„, aus denen sich das Stichprobenmittel x und die 
Stichprobenstandardabweichung s als Maß für die Steuerung um den Mittelwert bestimmen lassen. 


Für den Mittelwert (arithmetisches Mittel) gilt: 


5 o (6.3.1) 
i=1 


x= 


sl 
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Für die Standardabweichung gilt: 


LT Fe 
eV 2 (6.3.2) 


Nach beliebiger Wiederholung der Stichprobe über eine normalverteilte Grundgesamtheit würden 
sich als Mittelwert aller einzelnen Stichproben-Mittelwerte der Erwartungswert u und als Mittel- 
wert aller Stichproben-Standardabweichungen die Standardabweichung o als Verteilungsparameter 
ergeben. 

Als Ergebnis einer Stichprobe werden der Streubereich der stochastischen Veränderlichen X selbst 
und der Streubereich für den Erwartungswert angegeben: 


i=1 


x=x+ (6.3.3) 


Km axt (6.3.4) 


$ 
EM 
Yn 
Da auch bei beliebig verteilter Grundgesamtheit das Stichprobenmittel x wenigstens annähernd 
normalverteilt ist, kann mit den Verteilungsparametern u=x und 0 = shYn von der repräsentativen 
Stichprobe mit den Gesetzen der (u, o)-Normalverteilung auf die Gesamtheit geschlossen werden. 


6.3.1 Vertrauensbereich des Mittelwertes 


Bei verschiedenen Stichproben werden im allgemeinen die aus den Stichproben ermittelten Kenn- 
zahlen von Stichprobe zu Stichprobe variieren. Daher ist die aus einer Stichprobe ermittelte Kenn- 
zahl, z.B. der Mittelwert x, nur ein Schätzwert für den Erwartungswert u der Grundgesamtheit. Zu 
diesem Schätzwert läßt sich ein Intervall angeben, daß den Erwartungswert einschließt. Dieses Inter- 
vall, dessen Grenzen von der zugrunde gelegten statistischen Sicherheit S abhängen, nennt man den 
Vertrauensbereich des Mittelwertes: 


o = c 

MU —— SxXSutuo — (6.3.5) 
yYn Yn 

Die zweiseitig begrenzten Vertrauensbereichsgrenzen lassen sich bei vorgegebener statistischer Sicher- 

heit S nach Abschnitt 6.1.1 für normalverteilte Grundgesamtheiten mit dem Programm Label D als 

Un = f(u,0,S) bestimmen. Für einseitig begrenzte Vertrauensbereiche ist die Startadresse Label d 

vorgesehen. 


6.3.2 Programmbeschreibung „Stichproben-Klassifizierung‘’ 


Das in Tabelle 6.3.1 angegebene Programm umfaßt einen Eingabeteil, der über Label E in Zeile 001 
und einen Berechnungsteil, der über Label A in Zeile 014 gestartet wird. Als Eingabedaten müssen 
die Werte x; und die Häufigkeit des jeweiligen Wertes n; über die Tastatur eingegeben werden. Nach 
Eingabe des ersten Wertepaares wird das Eingabeprogramm durch Betätigung der Taste E gestartet. 
Alle weiteren Wertepaare werden nach ihrer Eingabe durch Betätigung der R/S-Taste verarbeitet. 

In Zeile 002 wird der Wert für die Häufigkeit nach STO | abgespeichert und steht dort zur Steue- 
rung der Programmschleife Label O von Zeile 004 bis 009 zur Verfügung. Die Summation der x;- 
Werte wird mit Hilfe der Funktionstaste in Zeile 005 durchgeführt. Nach Abschluß der Ein- 
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Tabelle 6.3.1 Anweisungsliste „‚Stichproben-Klassifizierungsprogramm” 


Start 


Statistik 


Vertrauensb. 844 


k 


122 


66! x&LBLE 

662 STOI 

865 Ar 

664 &LBL& 

885 ä+ 

866  ENTt 

667 LSTA 

a5 DSZI 

865  6T06 

dis A8r 

ei! ST 

612 RTN<E NX 

8i5 _STOE 

6i4_ »LBLA 

615 RELE 

eleE FRTIA=DN 

67 SFC 

8i5 x 

815  STOA 

626 PRTA=DX 

di SFC 

822 5 

623  STOB 

624 PRIA=DS 

625 RELC 

[73 YA 

827 * 

28 STOD 

823 FRTX=D sm 

638  RCLA 

851 A 

832 * 

823 SFC 

634 FRTA=D %o 

835 LSTK 

536 CHS 

637 RELA 

836 + 

0335 PRTK=D xy 

846 R-S5 
sLBLb 

842 SF& 

843 6ETOI 

644 xiBLd 

845 CF& 

646 sLBLl 

847 Ci 

645 SPC 

643 6 

856  STO3 

851 STO& 


UP 


PRTX=Dup 
SPC 
RCLB 
RELC 
IK 


gabe können damit der Mittelwert und die Standardabweichung unmittelbar über die Funktions- 
tasten [x] und [s] aufgerufen werden. Da hierzu die Sekundärspeicher STO 4’ bis STO 9’ benötigt 
werden, müssen diese vor dem Programmstart über Label E gelöscht werden. Als Ergebnisse werden 
folgende Klassifizierungsmerkmale für die Stichprobe ausgegeben: 


In Zeile 016 n = Anzahl der Eingabewerte 

In Zeile 020 x = Mittelwert der Eingabewerte 

In Zeile 024 s = Streubereich der Eingabewerte 

In Zeile 029 sm = Streubereich des Mittelwertes 

In Zeile 034 x. = oberer Grenzwert der Mittelwertstreuung 
In Zeile 039 x, = unterer Grenzwert der Mittelwertstreuung 


Der Mittelwert wird nach STO A, der Streubereich der Eingabewerte nach STO B, die Anzahl der 
Eingabewerte nach STO C und der Streubereich des Mittelwertes wird nach STO D abgespeichert. 
Damit sind schon die Eingabespeicher für eine anschließende Normalverteilung durch Start D oder 
mit dem Programm nach Tabelle 6.1.1 richtig belegt. Zum Beispiel kann nach Eingabe eines Wertes 
für die statistische Sicherheit in STO E über Start [o] der Vertrauensbereich des Mittelwertes oder 
nach dem Einlesen des Programms ‚‚Gaußsche Normalverteilung‘' durch Betätigung der Taste C die 
statistische Sicherheit für einen vorgegebenen Streubereich unmittelbar berechnet werden. 

Die Berechnung der Stichproben-Kenngrößen gemäß den Gin. (6.3.1 bis 6.3.4) ist in Zeile 040 be- 
endet. In der Zeile 041 beginnt mit der Startadresse Label D das Programm zur Berechnung des 
Vertrauensbereiches des Mittelwertes nach GI. (6.3.5). In diesem Programm wird die numerische 
Integration der Normalverteilungskurve im Gegensatz zu der Variante Label D nach Tabelle 6.1.1 
mit der Simpson-Regel gemäß GI. (4.4.5) durchgeführt. Hierzu wird in Zeile 083 in STO 0 die Strei- 
fenbreite h = 0,1 abgespeichert. Bei jedem Schleifendurchlauf innerhalb der Zeilen 086 bis 107 wird 
das Unterprogramm Label e zweimal aufgerufen, um die Ordinatenwerte im Abstand h und 2h vom 
jeweiligen Anfangspunkt zu berechnen. In den Zeilen 108 bis 119 ist das schon unter Abschnitt 
6.1.2.4. erläuterte Pilgerschrittverfahren für das Herantasten an den vorgegebenen Wert des Inte- 
grals programmiert. In Zeile 125 wird der Wert der erreichten Fraktile als normierte zweiseitige 
Vertrauensbereichsgrenze u, (bei Start D) oder als normierte einseitige Vertrauensbereichsgrenze 
u} (bei Start d) ausgegeben. In den Zeilen 132, 137 und 142 werden das Vertrauensintervall sowie 
die obere und untere Intervallgrenze ausgegeben. 


6.3.3 Anwendungsbeispiel 


Die Höhe neunjähriger Kiefern wurden an n = 125 Bäumen gemessen. Es kommen Höhen von 61 
bis 270 cm vor. Die aufgenommenen Meßwerte werden 11 Klassen mit je 20 cm Spannweite von 
(60 + 10) cm bis (260 + 10) cm zugeordnet [15]. Im einzelnen wurden folgende Werte ermittelt: 


Höhe incm | 60 80 100 120 140 160 180 200 220 240 260 

Anzahl 171 2 8 15 22 SO 27 9 6 3 

a) Wie groß ist die mittlere Höhe der erfaßten Bäume? 

b) Welcher Streubereich ist im einzelnen zu erwarten? 

c) Welcher Streubereich ist im Mittel zu erwarten? 

d) Wie groß ist der Vertrauensbereich bei einer statistischen Sicherheit von 95 % und 99 %, wenn 


eine (u =x, o = s//n) Normalverteilung zugrunde gelegt werden kann? 
e) Wie groß ist die statistische Sicherheit für den unter c) ermittelten Streubereich? 
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Zu dem Anwendungsbeispiel sind folgende Eingaben erforderlich: 


PZS: 
60 ENTER 


Sekundärregister löschen 


1 E Anzeige: 1 
80 ENTER 1 R/S Anzeige: 2 
100 ENTER 2 R/S Anzeige: 4 
120 ENTER 9 R/S Anzeige: 13 
140 ENTER 15 R/S Anzeige: 28 
160 ENTER 22 R/S Anzegei: 50 
180 ENTER 30 R/S Anzeige: 80 
200 ENTER 27 R/S Anzeige: 107 
220 ENTER 9 R/S Anzeige: 116 
240 ENTER 6 R/S Anzeige: 122 
260 ENTER 3 R/S Anzeige: 125 


Lösung zu a), b) und c): 


Start [A]: n = 125,00 


ii 


x| 
N 


176,32 Lösung zur Frage a) 

s = 36,67 Lösung zur Frage b) 

Sm= 328 Lösung zur Frage c) 
%o = 179,60 
%n = 173,04 


Für die Eingabe sind rund 5 Minuten erforderlich. Die Berechnung der Ergebnisse ist in rund 10 
Sekunden erledigt. 

d) Vertrauensbereich 

Der Vertrauensbereich für den Mittelwert ist eine Funktion der statistischen Sicherheit. Da der 


Mittelwert bereits in STO A und die Standardabweichung bereits in STO B vorliegt, muß vor dem 
Start mit Label D noch die gewünschte statistische Sicherheit in STO E eingegeben werden: 


95 STOE 
Start [o]: Nach rund 2 Minuten Rechenzeit werden folgende Ergebnisse ausgegeben: 
AR Normierte zweiseitige Vertrauensbereichsgrenze ua = 1,96 
2: Vertrauensintervall Ax= 6,43 
3. Obere Intervallgrenze %o = 182,75 
4. Untere Intervallgrenze %xu = 169,89 


Nach Änderung der statistischen Sicherheit auf 99 % durch die Eingabe 99 STO E werden nach 
dem Start [o] folgende Ergebnisse ausgegeben: 


1. Normierte zweiseitige Vertrauensbereichsgrenze uz = 2,58 
2 Vertrauensintervall Ax= 8,45 
3 Obere Intervallgrenze %o = 184,77 
4. Untere Intervallgrenze Xu = 167,87 


e) Statistische Sicherheit 

Die Frage nach der statistischen Sicherheit bei vorgegebenem Streubereich ist die Umkehrung der 
Frage d) nach dem Vertrauensbereich. Zur Beantwortung dieser Frage muß das Programm „Gauß- 
sche Normalverteilung‘’ nach Tabelle 6.1.1 eingelesen und die Streubereichsgrenzen x, und x, in 
die Speicher STO C und STO D eingegeben werden. 
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Nach Start wird als Ergebnis S = 0,6827 = 68,27 % ausgegeben. Für einen Streubereich 
x=x +10 ergibt sich eine statistische Sicherheit S = 99,77 %. 


6.4 Regressionsanalyse 


Die Regressionsanalyse beschäftigt sich mit der Art des Zusammenhangs zwischen den Wertepaaren 
x; und y; mit dem Ziel, eine funktionale Abhängigkeit y; = f(x;) zu finden, welche die Menge der 
Wertepaare möglichst gut approximiert. Die Regressionskennlinie wird nach dem Gaußschen Prin- 
zip der kleinsten Quadrate aller Abweichungen durch die gegebene Punktmenge gelegt. Bei linearer 
Abhängigkeit wird eine Regressionsgerade zugrunde gelegt. Die Benennung Regression wurde von 
Galton (1822—1911) eingeführt, der die Körperlängen von Eltern und Kindern verglich und dabei 
beobachtete, daß zwar im allgemeinen große Väter große Söhne haben, daß diese Beziehung jedoch 
nicht immer stimmt, da die Körpergröße der Söhne im Mittel etwas kleiner ist, als die der Väter, 
umgekehrt aber kleine Eltern im Mittel etwas größere Kinder haben. Diesen „Rückschlag“ in Rich- 
tung auf die Durchschnittsgröße der Bevölkerung bezeichnete er als Regression. 

Zur Bestimmung der Regressionskoeffizienten dienen die Normalgleichungen, wie sie in den 
Tabellen 6.4.1 und 6.4.2 für Funktionen mit zwei oder drei Regressionskoeffizienten angegeben 
sind [25]. 

Als Maß für die Beurteilung der Approximationsgüte der Regressionslinie mit den gegebenen Werte- 
paaren dient der Korrelationskoeffizient r: 


guy EN En 
L (6.4.1) 


Ver Lo] [ren] 


In den nachfolgend angegebenen Programmen werden die Regressionskoeffizienten der verschie- 
denen Funktionstypen unter den angegebenen Startadressen A bis a, A bis C und A aufgerufen. 
Der Korrelationskoeffizient nach GI. (6.4.1) wird für die Regressionen nach Tabelle 6.4.1 sowie für 
die Glockenkurve nach Tabelle 6.4.2 in einem Unterprogramm mit der Einsprungadresse Label b 
berechnet. 


Tabelle 6.4.1 Regressionsgleichungen und Normalgleichungen für zwei Regressionskoeffizienten 
Regressionsgleichungen Normalgleichungen 


antbix=&Ly 
=at+t 
aöx t+bEx? = 2 (xy) 


1 ady? +bXlxy?)=Dy 
a+bx aw(xy?) +bL(x?y?) = Zixy) 
an+b&ix=LIny 
a®x+bEx? = N(xIny) 
an+tbäinx=Dy 
a®Inx+bX(Inx)? = Z(yIny) 
an+b&inx = Ziny 
aölnx +bX&(Inx)? = E(Inx Iny) 


nIna+Inböx=&ZiIny 
Inaöx +InbEx? = Z(x Iny) 


y= 


Iny=a+bx 


y= e?ed* 


y=atbinx 


Iny=atblinx 


Iny=Ina+xInb 
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Tabelle 6.4.2 Regressionsgleichungen und Normalgleichungen für drei Regressionskoeffizienten 


Start- 
adresse 


Regressionsgleichungen Normalgleichungen 


ant+büöx+tcäüx?=Ny 
y=atbx+cox? a®x+bEx? +cIx? = Ixy 
aux? +bXx? +cDx* = Dx?y 
an+tbix+tcix=Ly 
y=atbx+tcx aöx+bäx?+cNx”? = Ixy 
aux? +bXx° +cüx?/? = xy 


nIna+InbEx+Inc®x? = Ziny 
Ina®x +InbEx? + Inc&x° = E(xIny) 
Ina®x? +InbEx? +ncix? = £(x? Iny) 


2 
y = ab”c* 
Iny=Ina+xInb+x?Inc 


2 
k au = n(be? + Ina) - 2bc®x +bEx? = Iiny 
ar 5 (bc? + Ina) &x - 2be Ex? + bEx° = Ex Iny) 
. (be? + Ina) Ex? - 2beXx? +b&x* = E(x?Iny) 
mit 
1 
M=c; 0= 2p, kraov2n 


6.4.1 Programmbeschreibung „Regressionsanalyse‘ 


1. Programm zur Berechnung von zwei Regressionskoeffizienten 


In der Anweisungsliste (Tabelle 6.4.3) sind fünf Programme mit den Startadressen Label A,B,C, 

D, E und a gemäß Tabelle 6.4.1 zusammengefaßt. Im Anschluß an die Eingabeadresse ist jeweils 
eine Programmunterberechnung in Form einer R/S-Anweisung zur Eingabe des x, y-Wertepaares 
vorgesehen. Die Eingaberoutine wird über das Indexregister mit Hilfe der DSZ I-Anweisung ge- 
steuert. Sie wird verlassen, wenn die über STO | eingegebene Anzahl der Stützwerte abgearbeitet 

ist. 

Mit dem Unterprogrammaufruf GSB b wird das Unterprogramm Label b von Zeile 103 bis 131 zur 
Berechnung des Korrelationskoeffizienten nach GI. (6.4.1) aufgerufen. In Zeile 104 wird hierzu 

der eingangs sekundäre Speicherbereich aktiviert, in dem als Ergebnis der &+-Anweisungen folgende 
Speicherbelegungen vorliegen: 


STO4: Zx 
STO5: ix? 
STO6: Zy 
STO 7: Zy? 
STO 8: Ixy 
STO9 n 


Der berechnete Korrelationskoeffizient wird in Zeile 123 nach STO E abgespeichert und in Zeile 
129 ausgegeben. 
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Tabelle 6.4.3 Anweisungsliste „‚Regressionsanalyse für zwei Koeffizienten‘ 


a+bx 661 »LELA 653  GSBb 185 | RCLB 157 LN 
BE o RS 854  REL2 186 | RCL4 158 | ST+2 
883 I 655  STO6 187 | RCL6 159 x 
B64 DSZI 656  REL3 188 x 168 | ST+3 
665 STR 857  5TO8 183 | RCLI 161 16107 
+ 655 08586 __6TO6 118 5 UP 162 aLBL3 
a 1li - lee P3S 

= 08 RS 112 | RCL4 164 | STOoA 
685 B6i 6583 113 &2 165 LN 
6i6 sTo7 862 DSZI 114 | RCL9 166 | ST+2 
611 | RCLS 863 6TOD 115 E 167 x2 
eiz | STCi 864  6SBb 116 | RCL5 168 | ST+3 
613 | Rlid4 865  REL2 117 - 163 | xer 
6i4 | 6555 866  STO4 118 | RüLs 176 | STOB 
615 | RÜLE 867  REL3 113 xE 171 | ENTt 
ei6 | 6585 868 STOS 126 | RCLS 172 LN 
617 | 1521 869 RELI 121 * 173 x 
eis| 1521 878 STO8 122 | RCL? 174 | ST+1 
815 | RciL4 71 __6TO6 123 - 175 L- 6107 
626 | 6555 124 x UP 176 rsLBLe 
621 | RCL5 [) R75 125 | ABS 177 P2S 
622 | 6555 874 LN 126 ‘X 178  RCL7 
623 | RCLB 875 = 127 5 179  REL2 
624 | 6585 876 LN 128 | STOE 186 = 
625 | 6SBe 877 je 129 | PRTX=Dr 181  STOA 
B26 | PRIÄ=Da 878 It 136 | SPC 182  RCL3 
627 | RCLB 6798 DSZI 131 RTN 183 x 
625 | PRTX=D>b 08866 STOE UP 132 «LBLi 184 ST-8 
625 | SPC 681 en 133 m P3S 185  RCLA 
636 | RTN 134 | STOA 186  RCL4 
631 |»LBL5 [ao p* 863 LBLe 135 x2 187 x 
632 | 1521 04 RS 136 eV 188  5T-9 
BR A STOi 885 6562 137 | STOB 189  RCLI 
666 DSZI 138 KE 198  RCL8 

Tess sb] 05 vLBLB 887° ETOa 133 | STOC 191 € 
656 RS 868 65Bb 148 x 192  STOB 
637° 6551 689 RELZ2 i41 | STr2 193  REL3 
6386 DSZI 038 STO6 142 | RCLC 194 x 
639  STOB 651 REL3 143 | RCLA 195 CHS 
646 — 65Bb 692  STO8 144 x 196  RCL4 
641 | RCL7 033 6586 145 | 5T+3 197 + 
842 | 5709 094  RLLA 146 |xLBL7 198  RCL2 
643 | RCL3 695 ex 147 | RCLB 195 # 
844 | 5104 096  5TOA 148 | RCLA 286 STOA 
645 | RCLZ2 637 PRTX=Da 149 25 26i 25 
” $T05 838 RELB 158 It 262 \- RIN 
6TO6 899 ex i5i__RTN |[Start__263_»LBld 

eü ebx 848 *LBLC 186 STOB UP 152 aiBl2 264 CLRE 
645 RS 181  PRT=Db 153 w PS 285 PS 
056 65B2 162 RS 154 | 5TOA 286  CLRE 
651 DSZI UP 163 «LBib 155 | x 267 STOI 
852 ETOC 184 m P&S 156 | STOB 2686 RS 
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In dem als Unterprogramm konzipierten Programmteil Label 6 werden von Zeile 007 bis 024 fol- 
gende Umspeicherungen aus dem aktiven Primärbereich in den Sekundärbereich vorgenommen: 


n von STO9 nach STO 2?’ 
Sx von STO4 nach STO 3’ 
Sy von STO6 nach STO4 
x von STO4 nach STO 7’ 
”x? von STO5 nach STO 8’ 
Zxy von STO8 nach STO 9’ 


Mit dem Unterprogrammaufruf Label e in Zeile 025 wird die Auflösung des Gleichungssystems mit 
2 Unbekannten nach dem Gaußschen Eliminationsverfahren eingeleitet. Die Ergebnisse werden in 
den Zeilen 026 und 028 ausgegeben. Der Regressionskoeffizient a ist in STO C und der Regressions- 
koeffizient b ist in STO D abgespeichert. 

Für die Programmvariante Label a wird der Programmteil Label 6 als Unterprogramm aufgerufen. 
Dadurch erscheinen bei dieser Variante zwei Wertepaare als Ergebnis, einmal in Form der natürlichen 
Logarithmen der Regressionskoeffizienten (Ina, Inb) und einmal als die Regressionskoeffizienten 
a,b. In den Unterprogrammen Label 1, Label 2 und Label 3 werden alle für die Programmvarianten 
B, C, D und a erforderlichen Summenbildungen vorgenommen, die nicht über die %+-Funktion ge- 
bildet werden. Im Unterprogramm Label 1 wird z.B. in STO 2 die Summe x?y? und in STO 3 die 
Summe (xy)? gebildet. Mit den Anweisungen zwischen GSB b bis GTO 6 werden gegenüber der 
Programmvariante Label A erforderliche Umspeicherungen in den 6 Speichern STO 4 bisSTO 6 
vorgenommen. 

Das Löschen der Primär- und Sekundärregister und die Eingabe der Anzahl Stützwerte aus dem X- 
Register vor dem jeweiligen Programmstart kann auch durch Aufruf der Programmadresse Label d 
erfolgen. 


2. Programm zur Berechnung von drei Regressionskoeffizienten 


In der Anweisungsliste (Tabelle 6.4.4) sind drei Programme mit den Startadressen Label A, B und 
C gemäß der ersten drei Zeilen in Tabelle 6.4.2 zusammengefaßt. Im Gegensatz zu der bisherigen 
Variante für 2 Korrelationskoeffizienten ist hier mit dem Unterprogramm Label e von Zeile 138 
bis 218 ein Gleichungssystem mit drei Unbekannten mit Hilfe der Gauß-Elimination aufzulösen. 
Die Variante Label C unterscheidet sich von der Variante Label A lediglich dadurch, daß der ein- 
gegebene y-Wert unmittelbar nach der Eingabe logarithmiert wird. 

Die Ergebnisse der Varianten Label A und Label B werden in den Zeilen 009 (Koeffizient a), 011 
(Koeffizient b) und 013 (Koeffizient c) ausgegeben. Für Variante C müssen die errechneten Koeffi- 
zienten vor der Ausgabe durch die e* Funktion entlogarithmiert werden. Hierzu sind die Anwei- 
sungen in den Zeilen 044 bis 052 vorgesehen. 

Das Löschen der Primär- und Sekundärregister und die Eingabe der Anzahl Stützwerte aus dem X- 
Register vor dem jeweiligen Programmstart kann hier durch Aufruf der Programmadresse Label E 
erfolgen. 


3. Programm zur Berechnung der Regressionskoeffizienten einer Glockenkurve 


Die Anweisungsliste (Tabelle 6.4.5) beginnt mit der Startadresse Label A in Zeile 001. Mit den 
folgenden drei Anweisungen werden alle Primär- und Sekundärregister gelöscht. Die vor dem Pro- 
grammstart über die Tastatur eingegebene Anzahl der Stützwerte für die Regressionsberechnung 
wird in Zeile 005 in das X-Register übernommen. Die Eingabeschleife erstreckt sich bis zur Zeile 
011 mit der Rücksprunganweisung GTO a. Mit dem Unterprogrammaufruf GSB b in Zeile 012 
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Tabelle 6.4.4 Anweisungsliste ‚‚Regressionsanalyse für drei Koeffizienten‘ 


a+bx+cx2 66i_xLBLA 


682 R-S 

6635 6561 

664 DSZI 

865 6T0A 

886 6556 

687 xLBL& 

666 65Be 

865 PRIk=>a 

6i8 RCLB 

sil PRTIA=D>b 

6i2 RELC 

013  PRIA=DC 

014 SPC 

615 RTN 
asbx+cVx __ 616 #LBLB 

817 R’S 

6i8 6552 

6193 DSZI 

0628 6TOB 

621 [6556 

822 | RÜLZ2 

623 | STOß 

824 | RCLI 

625 | RCL8 

826 25 

627° 5T03 

028 R+ 

623 5ST03 

636 RCLO 

63i  STOß 

832 PzS 

823 ET08 
arb%+c* 634 _ xLBLC 

835 R/S 

835 Aey 

837 LN 

838 er 

839 6561 

646 DSZI 

841  6TOC 

842 6556 

643 65Be 

844 RCLA 

845 e* 

846  PRTIA=D.a 

647 RCLB 

846 e* 

849 PRTIX=D>b 

058 RCLC 

851 e* 

052 PRTIk=Dc 

053 R/S 

0854 xLBL6 

855 1 

856 1 


UP 


UP 


169 ST-i 
178 RCLA 
171 RCLB 
172 x 
173. 1821 
174 ST-i 
175  RCLA 
176 RCLI 
177 x 
178 1521 
179: 87-4 
186 5 
181  RCL7 
182  RCL2 
163 ® 
184 $STOA 
185  RCL3 
186 x 
167 ST-8 
1886  RCLA 
189  RCL4 
196 x 
191 5T-9 
192  RCLI 
193 RCLE 
194 * 
195  STOC 
196  RCL3 
197 x 
136 CHS 
199  RCL4 
266 + 
261 RCL2 
262 s 
263 STOB 
264 P2S5 
2085 REL? 
266 x 
267 _ RELC 
2066 RCLE 
265 x 
216 + 
2il CHS 
212  RCLI 
213 + 
214  RÜLE 
215 * 
2i& STORA 
Zi? RTN 
Start _ 218 LBLE 
218 CLRE 
226 25 
221 CLRE 
222 $T0lI 
223 R’S 
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Tabelle 6.4.5 Anweisungsliste „Regressionsanalyse mit Glockenkurve” 


Start 
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661 _ xLBLA 
BZ CLRE 
663 F2S 
864 Like 
805 STOI 
686 &iBla 
667 RELI 
865 R/S 
005 6551 
si6 DSZI 
ll 5TOa 
dl2 655b 
613  RELS 
614 RCL4 
615  RCLI 
öls Pz 

617  RELB 
618 #5 
619 ST09 
626 R+ 
82i  STO6 
822 R+ 
623 5707 
624 R+ 
625  STO& 
625  RLL4 
Pr 2 

626  STOI 
825 R+ 
836 STDZ 
831 STO& 
632 REL3 
633 ST07 
034 F& 

835  65$Be 
0836  REÜLA 
037 RCLB 
838 CHS 
0835  RLLC 
646 STOB 
641 * 

d42 2 
645 * 

B44 STOC 
645 R+ 
645  RCLB 
647 RELC 
845 A 
845 x 

856 = 

651 e* 
052 STOA 
0853 65Be 
654  ETOB 


UP 


UP 


UP 


STOE 
PRTA=DrT 

SPC 

RTN 

xLBLe 

i 

1 


STOI 
RCLi 
RCL& 


STOR 
RCL? 
A 
ISZI 
ST-i 
RCLA 
RCL& 
x 
ISZI 
ST-i 
RELA 
RCLS 
x 
ISZI 
ST-i 
ISZI 
ISZI 
RcLi 
RCL& 


5ToA 
RCL? 


ISZI 
ST-i 
RCLA 
RELE 
x 
1521 
ST-i 
RCLA 
RCL3 
x 
1521 
ST-i 
#5 
RCL? 
RCL2 


$Ton 
RCL3 
57-8 
RCLA 
RCL4 
x 
57-3 
RCLI 
RCL& 


STOC 


UP 


RCLA 

x 
RCLC 

5T0A 

ker 

STOC 

65Bc 

R/S 
xLBLc 

RCLA 
PRTA=D a, U 
RCLB 
PRTZ=>b,0 
RCLC 
FRTX=D c,k 

SPC 

RTN 

R-S 


wird die Berechnung des Korrelationskoeffizienten gemäß GI. (6.4.1) veranlaßt. In dem Unter- 
programm Label 1 ab Zeile 055 werden mit Hilfe der Registerarithmetik die Summen Ex° in 
STO 3, 2x* inSTO 8, ZIny inSTO 0, Ex Iny in STO 4und Üx?Iny in STO 9 des Primärregi- 
sters gebildet. Die übrigen Summen aufgrund der &+-Anweisung sind den Sekundärspeichern 
STO 4’ bis STO 9’ zugeordnet. Nach der Auflösung des Gleichungssystems mit drei Unbekannten 
im Unterprogramm Label e werden zuerst die Regressionskoeffizienten a, b, c ab Zeile 210 und 
anschließend die für statistische Beschreibungsmethoden geeigneten Koeffizienten u, o, k gemäß 
der in Tabelle 6.4.2 (letzte Zeile) angegebenen Gleichungen ausgegeben. 


6.4.2 Anwendungsbeispiele 


1. Regressionsanalyse mit zwei Regressionskoeffizienten 


a) Für die angegebene Wertetabelle der (x;, y;)-Wertepaare soll eine Regressionsgerade ermittelt 
werden: 


y=atbx 
x 10 0238 4 5 6 
vlıı 3 25 35 45 45 
Um vor der Eingabe die Primär- und Sekundärregister zu löschen, und die Anzahl der Stützwerte 


nach STO | abzuspeichern, kann das Hilfsprogramm Label d aufgerufen werden. 
Eingabe: 

1. Anzahl der Stützwerte 7 [a] 

2. Start 

3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 


Ergebnisse: 

1. Korrelationskoeffizient 
r= 0,95 

2. Regressionskoeffizienten 
a=0,93 

b = 0,64 
Regressionsgleichung: Bild 6.4.1 Lineare Regression 
y = 0,93 + 0,64x 

Rechenzeit rund 10 Sekunden 


—— m X 


b 


Die Wertepaare der anggebenen Wertetabelle sollen durch eine Regressionsgleichung in Form 
einer Hyperbel-Funktion approximiert werden: 


DE . 
at+bx 


Y 


x 0. 1 2 3 4 5 6 7 8 9 10 
vI1ı 07 04 05 02 04 02 03 03 01 0,1 
Eingabe: 


1. Anzahl der Stützwerte 11 [a] 
2. Start 


3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 
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Ergebnisse: 


1. Korrelationskoeffizient 

r= 0,84 

2. Regressionskoeffizienten 

a = 1,02 

b = 0,42 

Regressionsgleichung: y= BETEN RE ze X 
1,02 + 0,42x 2 DREHEN Y 

Bild 6.4.2 Nichtlineare Regression 
Rechenzeit rund 10 Sekunden (Hyperbel-Funktion) 


c) Die Wertepaare der angegebenen Wertetabelle sollen durch eine Regressionsgleichung in Form 


einer e-Funktion approximiert werden: 


Iny=sat+tbx oder y=e?e* 


x MOB An 259,0 
vl. 4 4 26 2.2 1,6 1,61 0,6: 0,6 


Eingabe: 

1. Anzahl der Stützwerte 11 [al 

2. Start 

3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 


Ergebnisse: 

1. Korrelationskoeffizient 
r=-0,96 

2. Regressionskoeffizient 
a = 1,71 (e? = 5,50) 


b=- 0,23 DR 
Regressiongslgeichung: Bild 6.4.3 Nichtlineare Regression 
Iny = 1,71 — 0,23x (e-Funktion) 


y = 5,50. 9.?°% 


Rechenzeit rund 10 Sekunden 


d) Die Wertepaare der angegebenen Wertetabelle sollen durch eine Regressionsgleichung in Form 
einer logarithmischen Funktion approximiert werden: 
y=atbinx 
Kulale 28 4 5,0607 8 9" 10 
y 8 #2 21 2 0 0 
Eingabe: 


\ 
1. Anzahl der Stützwerte 10 [a] | . | 


2. Start 
3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 


0 
Ergebnisse: 
1. Korrelationskoeffizient = 
r=-091 Bild 6.4.4 Nichtlineare Regression 


(logarithmische Funktion) 
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e 


f) 


2. Regressionskoeffizient 
a = 5,64 

b=- 2,41 
Regressionsgleichung: 

y = 5,64 - 2,41 Inx 


Rechenzeit rund 10 Sekunden 
Die Wertepaare der angegebenen Wertetabelle sollen durch eine Regressionsgleichung in Form 
einer Potenzfunktion approximiert werden: 
Iny=sa+tbiInx oder y=e?’xP 
211 2 93: 4 5 67 8 9 10 
yIl15 5 5.15 15 25 30 40 50 


Eingabe: 

1. Anzahl der Stützwerte 10 [f ] [a] 

2. Start 

3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 


Ergebnisse: 

1. Korrelationskoeffizient 

r = 0,97 

2. Regressionskoeffizient 

a = 3,66 10°? (e? = 1,00) 

b = 1,62 

Regressionsgleichung: 

Iny = 3,66 :10°° + 1,62 Inx oder y= 1,0x'’62 


Rechenzeit rund 10 Sekunden 


Bild 6.4.5 Nichtlineare Regression 
(Potenz-Funktion) 


Die Wertepaare der angegebenen Wertetabelle sollen durch eine Regressionsgleichung in Form 
einer Exponentialfunktion approximiert werden: 


y=ab* oder Iny=Ina+xInb 
x| 3 456 7 8 9 10 
..05 2 4 8 1025 50: 100 


Eingabe: 

1. Anzahl der Stützwerte 8 [f] [a] 

2. Start 

3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 


Ergebnisse: 
1. Korrelationskoeffizient 
r = 0,85 
2. Regressionskoeffizient 
Ina = - 2,37 
Inb = 0,70 

a=0,09 — X 

b = 2,02 Bild 6.4.6 Nichtlineare Regression 
(Exponentialfunktion) 


Rechenzeit rund 10 Sekunden 
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2. Regressionsanalyse mit drei Regressionskoeffizienten 


a) Für die angegebene Wertetabelle der (x;, y;)-Wertepaare soll eine Regressionsparabel ermittelt 
werden: 


ysa+tbx+tox? 


x 1:0. le 32, 8 A N 89, 10 
y.1 10 Sn ORTE BETABEN a7 NE 2=0 


Um vor der Eingabe die Primär- und Sekundärregister zu löschen, und die Anzahl der Stützwerte 
nach STO | abzuspeichern, kann das Hilfsprogramm Label E aufgerufen werden. 

Eingabe: 

1. Anzahl der Stützwerte 11 [E] 

2. Start 

3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 


Ergebnisse: 
Regressionskoeffizienten 
a=0,53 

b=3,12 

c = - 0,33 
Regressionsgleichung: 

y = 0,53 + 3,12x - 0,33x? 


Rechenzeit rund 10 Sekunden 


Bild 6.4.7 Regressionsparabel 1. Art 


b) Die Wertepaare der angegebenen Wertetabelle sollen durch eine Regressionsparabel approximiert 


werden: 

ysatbxtoyx 

Ulm as a A 6 778 gr‘ 
yı a binb. 4b 4 80 25 25 1 1 


Eingabe: 
1. Anzahl der Stützwerte 11 [El 


2. Start 


3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) 


Ergebnisse: 
Regressionskoeffizienten 
a= 403 
b=- 1,07 
c= 2,12 


Regressionsgleichung: Bild 6.4.8 Regressionsparabel 2. Art 
y= 4,03 - 1,07x + 2,12 Yx 


Rechenzeit rund 10 Sekunden 


Die Wertepaare der angegebenen Wertetabelle sollen durch eine Regressionsgleichung in Form 
einer quadratischen Exponentialfunktion approximiert werden: 


c 
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d 


O0 1 2 3 a 5 6 7 8 9 10 
y|iı 10 100 1000 1000 1000 1000 1000 100 10 1 


Eingabe: 
10000 


1. Anzahl der Stützwerte 11 [El v 


2. Start 1000 }- 
3. Wertepaare (y-Wert, ENTER, x-Wert, R/S) \ 


Ergebnisse: | au 

Regressionskoeffizienten Tu 

a= 0,89 

b = 20,20 1 

c= 0,74 x 
Regressionsgleichung: Bild 6.4.9 Nichtlineare Regression durch eine 
y=0,89- 20,20* - 0,74* Exponentialfunktion 


Die Wertepaare der angegebenen Wertetabelle sollen durch eine Regressionsgleichung in Form 


einer Glockenkurve approximiert werden: 


yaafdiı-c? 


Weiter sind die Koeffizienten einer approximierten Normalverteilung zu bestimmen: 


e (x-w? 


k e 202 


i Yaro 
30. wi 2,8 38 BB 8 1‘ 
yı 152790: #8: 1997 rg vr ze 1 


Vor Betätigung der Starttaste A muß die Anzahl der Wertepaare eingegeben werden: 


11 Start 


Nach Anzeige 11 Eingabe 2 ENTER 0, R/S 
Nach Anzeige 10 Eingabe 6 ENTER 1, R/S 


Nach Anzeige 1 Eingabe 1 ENTER 10, R/S 


Ergebnisse: 

1. Korrelationskoeffizient 
r = 0,54 

2. Regressionskoeffizienten 
a= 8,16 

b=-0,07 

ce= 3,83 

M= 3,83 

o= 2,72 

k= 55,55 


Regressionsgleichung: 
y= 8,16 60.07 (x- 3,83)? 


Rechenzeit rund 30 Sekunden 


Bild 6.4.10 Nichtlineare Regression durch 
Glockenkurve 
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6.5 D’Hondtsches Verteilungsverfahren 


Das D’Hondtsche Verteilungsverfahren wurde von dem Belgier V. D’Hondt angegeben als Berech- 
nungsart für die Verteilung der Sitze bei der Verhältniswahl in Form von Listenwahlen [28]. Nach 
diesem Verfahren werden die Stimmzahlen der einzelnen Listen nacheinander durch 1, 2,3, ... 
dividiert. Je nach der Höhe der Teilstimmenzahlen, die auf die einzelnen Listen entfallen, werden 
die zu vergebenden Sitze auf die einzelnen Listen verteilt. 


6.5.1 Formalismus des Verteilungsverfahrens 


Die zu vergebenden Sitze werden in jeder Verteilungsrunde nach der Höchstzahlenauswahl an die 
Liste mit der höchsten Teilstimmenzahl vergeben. Anschließend wird die Stimmenzahl der bedien- 
ten Liste durch einen für jede Liste getrennt zugeordneten monoton ansteigenden Teiler 1, 2,3, ... 
dividiert. Die allgemeine Beschreibung dieses Verfahrens läßt sich aus der Entwicklung über die 
ersten drei Verteilungsrunden ableiten: 


1: Verteilungsrunde: 
1) n « ; (1) 
max {n, } ergibt ersten Sitz an Partei P, d.h.s. =1 
Die bediente Partei P, geht in die zweite Verteilungsrunde mit der Teilstimmenzahl: 
(1). 
2) _ Nik 
k 


) (6.5.1) 


FSK 


Die übrigen Parteien P; gehen mit unveränderter Stimmenzahl in die zweite Verteilungsrunde: 


“ x no für i#k (6.5.2) 
2. Verteilungsrunde: 
(2) E n @) _,.m 
max {n;” } ergibt Sitzan P,. d.h. = sk +1 
2 
— für i=k 
1+ Sk 
De (6.5.3) 
für if k 


jte  Verteilungsrunde: 


max {nn} ergibt Sitz an P. d.h. so) = a +1 


ni (6.5.4) 


6.5.2 Speicherstruktur 
Die Ausgangsstimmenzahlen und die Anzahl der zu vergebenden Sitze werden vor dem Programm- 


start in die Speicher STO A bis STO E und STO | abgelegt. Die nach jeder Verteilungsrunde in einer 
Position veränderte Stimmenzahlen werden während des Programmlaufs in die Speicher STO 1 bis 


136 


STO 5 und die zugehörigen bereits vergebenen Sitze in die Sekundärspeicher STO 1’ bis STO 5’ ge- 
speichert. Die Anzahl der zu vergebenden Sitze werden aus den Indexspeichern in den Arbeitsspeicher 
STO O umgespeichert und bestimmen die Anzahl der berechneten Verteilungsrunden. 

Das Indexregister steht dadurch während der Programmbearbeitung zur Steuerung der Arbeits- 
speicheradressen zur Verfügung. 


6.5.3 Programmbeschreibung „D’Hondtsches Verteilungsverfahren‘ 


Die Anweisungsliste zu dem Programm ist in Tabelle 6.5.1 angegeben. 

Nachdem die Eingaben in die Speicher A bis E und I getätigt sind, kann das Programm über die 
Startadressen Label A in Zeile 001 oder Label B in Zeile 004 durch Betätigung der Tasten A oder 
B mit zwei Ausgabevarianten gestartet werden. Ein Start über Label A bewirkt die Ausgabe aller 
Zwischenergebnisse nach jeder Verteilungsrunde, während der Start über Label B (Flag 1 wird in 
Zeile 005 gesetzt) lediglich die Ausgabe der Endverteilung bewirkt. 

Mit den Anweisungen in den Zeilen 008 bis 017 werden die Stimmenzahlen den Primärspeichern 
STO 1 bis STO 5 zugeordnet. Nach dem Wechsel der Speicherbereiche in Zeile 018 werden die 
Speicher für die gesuchte Sitzverteilung Null gesetzt. In dem in Zeile 029 aufgerufenen Unterpro- 
gramm Label a wird die jeweils höchste Stimmenzahl ermittelt und das Indexregister in einem wei- 
teren Unterprogramm Label 1 gleich der Adresse des entsprechenden Speichers gesetzt. Mit den 
Anweisungen 030 bis 044 wird der zu vergebende Sitz mit der ISZ (i)-Anweisung in Zeile 037 der 
Partei mit der höchsten Teilstimmenzahl zugeordnet und die Stimmenzahl durch die zugehörige 
um 1 erhöhte Teilerzahl dividiert. In den Zeilen 046 bis 055 wird die bereits vergebene Anzahl 
Sitze ermittelt. Falls das Flag 1 gesetzt ist, werden die Ausgabeanweisungen in den Zeilen 058 bis 
068 übersprungen. In Zeile 071 wird geprüft, ob die in STO 0’ abgespeicherte Zahl der zu vergeben- 
den Sitze schon erreicht ist. Falls dies der Fall ist, wird die Endverteilung ausgegeben. Andernfalls 
wird die zyklische Berechnung durch einen Rücksprung nach Label b in Zeile 027 fortgesetzt. Bei 
Gleichheit der Teilstimmenzahlen wird die Partei mit dem niedrigeren Ordnungsindex zuerst be- 
dient. Falls dies bei der letzten Verteilungsrunde auftreten sollte, so müßte dieser letzte Sitz durch 
Losentscheid zwischen den Parteien mit gleichen Teilstimmenzahlen vergeben werden. 


6.5.4 Testbeispiel 


Bei einer Wahl seien auf die fünf Parteien A, B, C, D und E folgende Stimmen gefallen: 


A: 800 Stimmen 
B: 1000 Stimmen 


C: 600 Stimen 
D: 400 Stimen 
E: 50 Stimen 


Nach dem D’Hondtschen Verfahren sind 20 Sitze zu vergeben. 


Eingabe: 800 STO A 


1000 STOB 
600 STOC Stimmen 
400 STOD 
50 STOE 
20 STOI zu vergebende Sitze 
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Tabelle 6.5.1 Anweisungsliste „‚D‘Hondtsches Verteilungsverfahren‘ 


Zwischenvertig. 


Endverteilung 5 
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RCL4 
+ 
RCLS 
+ 
sT0l 
Fi? 
6Tbe 
SPC 
PRTÄ=DNn 
SFC 
65Bd 
SPC 
DSF3 
25 
65 
F2S 
DSP& 
RCLI 
xLBLc 
RCL& 
17 
ETOb 
SFC 
RCLI 
FRTA=DS4 
RCL2 
PRTA=DS, 
RCL3 
PRTA=D Sz 
RCLD 
X=6? 
RS 
RCL4 
PRTÄ=DS,, 
RÜLE 
A=8? 
R-S 
RCLS 
PRTA=D Ss 
RrS 
*LBla 
2 
ö 
$T6l 
2 
1 
RöLi 
5T08 
RELZ 


66i #LELh 851 
862 cFi 652 
663 _6T06 853 
664 _ »LBLE 654 
665 Sri 855 
öds sLBLE 656 
667 DSF& 857 
6866 RLLA 655 
865 STOI 855 
816 RCLE 666 
eil  STO2 861 
ei2 RLLC 862 
613 STO3 863 
öi4  RELD d64 
615 STO4 865 
#i6 RCLE B66 
ei?  STOS 867 
8iß P2S 865 
615 | RÜLI 865 
8268 | STO6 re 
621 6 er 
622 | STOI Br2 
823 | STO2 673 
824 | STOS 874 
825 | STO4 675 
626 | ST05 876 
627 |*LBLb 877 
828 F2S 67 

825 65Ba 873 
036 RLLi 866 
631 RCLI 661 
632 P2S 862 
633 1 863 
634 3 664 
835 = 665 
636 | STOI 866 
837 | 1523 667 
638 R+ 865 
835 | RCLi 665 
846 1 836 
641 + uP 891 
842 ® 632 
643 F&S 633 
844 STOi 654 
845 F2S 835 
846 | RLLI 835 
847 | RELZ 657 
648 r 635 
645 | RÜL3 899 
858 + 166 


656 


UP 


UP 


161 
162 
183 
184 
185 
i86 
167 
185 
185 
118 
11i 
112 
113 
ils 
115 
il6 
117 
116 
113 
126 
121 
122 
123 
124 
125 
126 
127 
126 
1239 
136 
131 
132 
133 
134 
135 
136 
137 
138 
139 
148 
14i 
142 
143 
144 
145 
146 
147 
148 


2 


2 
RCL6 
RCEL3 
6551 
2 
3 
RCL& 
RCL4 
65Bl 
2 
4 
RCL6 
RELS 
6561 
RTN 
&LBL! 
A£Y? 
RTN 
5T06 
Ri 
Rt 
SToI 
RTN 
*LELd 
RCLI 
FSE 
PRTÄ=DS,.xı 
RELZ 
FSE 
PRTÄ=DS,,x, 
RCL3 
PSE 
PRTA=DS3,x3 
RCLD 
8=6? 
RTN 
RCL4 
FSE 
PRTA=DS,,,x 
RCLE er. 
A=8? 
RTK 
RELS 
FSE 
FRTX=DSg,Xx5 
RTN 
RS 


Start [8]: Ausgabe der Endverteilung 


Sitze A 6 
SitzeB 7 
SitzeC 4 
SitzeD 3 
SitzteE 0 


Rechenzeit rund 2 Minuten. 
Bei Start werden die Zwischenergebnisse in den einzelnen Verteilungsrunden ausgegeben: 
z.B. Ergebnis nach der 1. Verteilungsrunde: 


0 800 Stimmenzahl 
1 500 Teilstimmenzahl 
0 600 Stimmenzahl 
0 400 Stimmenzahl 
[6) 50 Stimemzahl 


Ergebnis nach der 6. Verteilungsrunde: 


2 266,667 
2 333,333 
1300 
1 200 
0 50 


Ergebnis nach der 19. Verteilungsrunde: 


6 114,286 
7 125,000 
4 120,000 
2 133, 333 
0 50,000 


Ergebnis nach der 20. Verteilungsrunde: 


6 114,286 
7 125,000 
4 120,000 
3 100,000 
0 50,000 


Der Programmlauf kann zur Änderung des Ausgabemodus durch Betätigung der R/S-Taste unter- 
brochen werden. Nach Löschen von Flag 1 (mit Ausgabe der Zwischenergebnisse) oder Setzen von 
Flag 1 (ohne Ausgabe der Zwischenergebnisse) wird das Programm durch erneute Betätigung der 
R/S-Taste an der Unterbrechungsstelle fortgesetzt. 
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7 Informatik 


7.1 Konvertierung zwischen Zahlensystemen 


In den verschiedenen Ebenen der digitalen Informationsverarbeitung werden polyadische Zahlen- 
systeme mit verschiedener Basis B verwendet. Auf der untersten Verarbeitungsebene wird die digi- 
tale Information durch elektrische Signale dargestellt, die technisch besonders einfach durch binäre 
Verknüpfungs- oder Speicherglieder verarbeitet werden können. Zur Darstellung von Zahlen wird 
daher auf dieser Ebene vorwiegend das duale Zahlensystem mit der Basis 2 und den Ziffern O und 1 
verwendet. Dieses System hat den weiteren Vorteil, daß die Anzahl benötigter Ziffern S zur Dar- 
stellung von Zahlen in einem vorgegebenen Zahlenbereich N nahezu minimal wird und damit tech- 
nisch einfache Speicherstrukturen ergibt. In einem polyadischen Zahlensystem können mit n Stel- 
len und der Basis B 


N=B” (7.1.1) 
unterschiedliche Zahlen dargestellt werden. Die Anzahl der benötigten Ziffern beträgt dabei: 


InN 


InB 17.1.2) 


S=Bn=B 


Das Minimum der Funktion B/InB liegt bei der Basis B = e = 2,71828. Für das duale Zahlensystem 
beträgt der Ziffernaufwand 2,88539 - InN gegenüber 4,3429 - In N beim dezimalen Zahlensystem. 


Auf der höheren Assembler-Ebene werden für die Kommunikation nach außen oktale Zahlensysteme 
und hexadezimale Befehlsverschlüsselungen verwendet. 


7.1.1 Bildungsgesetz einer Zahl [29] 


Ein Programm zur Konvertierung von Zahlen zwischen zwei Zahlensystemen beruht auf dem allge- 
meinen Bildungsgesetz einer Zahl Z zur Basis B mit der Ziffer c;, mit n Stellen des ganzzahligen 
Anteils und m Stellen des echt gebrochenen Anteils: 
n-1 
Z= ba c;B' (7.1.3) 
geaem 


Für die Ziffern c; gilt: 
0O<sc<SsB-1 (7.1.4) 


7.1.2 Konvertierung einer Zahl mit der Basis B in eine Dezimalzahl 


Ein programmtechnisch günstig zu realisierender Formalismus ergibt sich durch Auswertung der 
GI. (7.1.3) nach dem Horner-Schema: 
z={[(n-1'"B+tc-3)°B+c„-a]’B+...+c4}B +co 
Ile: Btraman BF mo Br. Fa tiß (7.1.5) 
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Mit Hilfe der Funktionstasten und lassen sich für den ganzzahligen Anteil und für den 
echt gebrochenen Anteil der gegebenen Zahl getrennte Lösungsformalismen angeben: 


Ganzzahliger Anteil Echt gebrochener Anteil 
en-ı = 51 Cm 5 
Sı'Btcn-2= 52 s1:B+tCo_m+1 52 
S2'Btc„-3 = Sa s2:B+tc_m+2 "753 
Sn-2'Btcı = 5-1 Sm-ı:Btc-ı =m 
Sn-ı'BtCo =5n = Zint Sm:  B = Sm4+1 = ZFrac 


Z10 = Sn, Sm+1 


7.1.3 Konvertierung einer Dezimalzahl in eine Zahl mit der Basis B 


Auch hier führt die Trennung des ganzzahligen Anteils von dem echt gebrochenen Anteil zu pro- 
grammtechnisch günstigen Lösungsformalismen. Der ganzzahlige Anteil in Gl. (7.1.5) wird sukzessive 
durch die gewählte Basis B dividiert. Bei jeder Division fallen als Rest die gesuchten Ziffern, begin- 
nend mit co bis zu c„-, an. Zur Berechnung des neuen gebrochenen Anteils wird der zweite Term 
in Gl. (7.1.5) sukzessive mit der gewählten Basis B multipliziert. Hier fallen nach jeder Multipli- 
kation die Ziffern c_} bis c_m an. Die Lösungsformalismen für beide Anteile laufen wie folgt ab: 


Ganzzahliger Anteil Echt gebrochener Anteil 


Zinn: B=Sı Rest co Zei "BA Pc 

Sı: B=5 Rest cı 5 ‚B=»+02 

S2: B=S3 Rest ca s 'B=s3 +C_3 
Sn-2:B = Sn-ı Rest cn-2 Sm "B=sm+ı +C-m+1 
Sn-1:B=0 Rest cn-1 Sn4rBen Tom 


Ze = &n-1Ch-2 62C4CH; C-4C-20_3. Cim+1lim 


7.1.4 Programmbeschreibung „Zahlensystem-Konvertierung‘ 


Die als Tabelle 7.1.1 angegebene Anweisungsliste enthält die Programme für die beiden Umwand- 
lungsrichtungen, Dezimalzahl in eine Zahl mit der Basis B über die Startadresse Label A in Zeile 
001 und Zahl mit der Basis B in eine Dezimalzahl über die Startadresse Label B in Zeile 066, mit 
B<S 10. Beide Programmvarianten laufen in den gemeinsamen Ausgabeteil ab Label 1 in Zeile 163 
zusammen. 

Vor dem Start muß die von 10 verschiedene Basis B in STO B abgespeichert werden. Die umzuwan- 
delnde Zahl Z muß über die Tastatur im X-Register bereitgestellt werden. 


Die Umwandlung Zıo in Zg führt zu Label A an den Anfang des Programms. In Zeile 005 wird 
die Ausgangsbasis 10 ausgegeben. Der ganzzahlige Anteil von Z}o wird nach STO 1 abgespeichert. 
Fails der gebrochene Anteil ungleich Null ist, wird in der Schleife Label 4 von Zeile 017 bis 035 
der gebrochene Anteil umgewandelt. Innerhalb dieser Schleife wird in den Zeilen 028 bis 032 fest- 
gestellt, ob die Anzahl Kommastellen schon den Wert 9 erreicht hat. Falls dies der Fall ist (bei in 
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Tabelle 7.1.1 Anweisungsliste „Zahlensystem-Konvertierung für Basis kleiner zehn‘ 


Zo—Zp 661 »LBiA 866 ISZI 113 &=? 
Doz DSF @61  RELI 128  6T06 
863 1 862 = 121 R4 
add ö 663  6TO8 122 R+ 
885  PRTX=DBasis 664  RCLB 123  X#8? 
BB x 865 __6T01 124 6705 
6er In 125 xLBL6 
as STOI 867  RCLB 126  DSPi 
885  LSTK 868 DSPB 127 #LBL5 
eie FRE 863 _PRTx-D>Basis 128 RELI 
bil 6 BrB Kr 129 5703 
ei2 STOI ei In 138 6 
813  5T02 #72  STOI 131 STOI 
id K8y 873  LSTK 132  STO® 
815 x=8? 074 FRC 133 RCLI 
eis 6705 875 5ST03 134 &LBL2 
8i7 xLBL4 B75 N) 135  ISZI 
sis DSZI e77  STOI 136 f 
019 RCLB 678  STO2 137 0) 
626 x 73 xer 138 5 
621 FRC 688 =? 139 INT 
622 LSTK e8si 6705 148 &#8? 
623 INT 082 xLBL& 141 6102 
024  RELI 683 ISZI 142 RÜLI 
625 16” 884 f 143  RCLI 
0265 x 685 [) 144 10% 
bar 5T+2 686  STx3 145 * 
626 3 857 x 146 STOI 
025 RL 08686 FRE 147° »LBL3 
esa'  cHS 089 xX#8? 148  RCLB 
831 - xar2 038 ECTOB 145 STx8 
632 6Ti6 891 »LBL7 158  RCLI 
833 Rt 692  RCLB 151 1 
634 &#6? 695 5T:2 152 6 
035  6T04 094  RCL3 153 x 
e36 RÜLI 695 1 154 FRÜ 
6377 005 896 0) 155  $T01 
0386 xLBLö 697 * 156  LSTK 
635 ST0I 098 INT 157 INT 
646  DSFi 055 5703 158 ST+6 
641 xLEL5 186  LSTX 159  DSZI 
842  ST03 181 FRC 166 6703 
843 D) 162 i 161 1 
044  STOI 183 6 162 6 
845  5T06 184 x 163 «LBLi 
646  RCLI 185  ST+2 164  RCL2 
647 xLBLE 166  DSZI 165  ST+8 
@48  RÜLB 167 6107 166  REL3 
645 = 165  RCLB 167 STOI 
658 INT 189 5T=2 168  RÜLO 
651 5T01 118  REL2 169 SPC 
052 LSTK ill #LBLS 176 PRIX=DZ 
0653 FR 112 1521 171 Rt 
054 RCLB 113 1 172  DSP& 
655 x 114 0) 173  PRTK=DBasis 
056 RÜLI 115 x 174 DSPi 
657. 10* 16 FRC 135 x 
058 x 117 3 176 SPC 
053 ST+8 116 RüLi 177 RS 
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Frac {Ze} = c_;-ı +c_;- 107° 


Int{Ze}= 0-1 +c;: 10! 


Ze = Int {Ze} + Frac {Ze} 


Bild 7.1.1 Flußdiagramm für die Konvertierung einer Dezimalzahl in eine Zahl anderer Basis 


Bezug zu der gewählten Basis unecht gebrochener Zahlen immer), wird die Nachkommaberechnung 
bei 9 Stellen abgebrochen und die Schleife mit einem Sprung nach Label 6 in Zeile 038 verlassen. 
Über die DSP (i)-Anweisung in Zeile 040 wird das Ausgabeformat den errechneten Nachkomma- 
stellen angepaßt. Ab Label 5 in Zeile 041 beginnt die Umwandlung des ganzzahligen Anteils ent- 
sprechend dem in Abschnitt 7.1.3 angegebenen Lösungsschema. Der strukturelle Ablauf der Rech- 
nung für den gebrochenen und ganzzahligen Anteil ist in dem Flußdiagramm nach Bild 7.1.1 aufge- 
zeigt. Zum Abschluß der Rechnung werden in Zeile 170 die errechnete Zahl Zg und in Zeile 173 
die zugehörige Basis B ausgegeben. 

Die Umwandlung Zg in Zıo wird mit Label B in Zeile 066 gestartet. Auch hier wird wieder die 
Ausgangsbasis als erster Wert in Zeile 069 ausgegeben. Falls die im X-Register vorgegebene Zahl 

Zg zur Basis B auch aus einem gebrochenen Anteil besteht, wird dieser zuerst umgewandelt. Hier- 
zu dienen die Anweisungen 082 bis 126. In der Schleife Label 8 von Zeile 082 bis 090 wird der in 
STO 3 abgespeicherte gebrochene Anteil der gegebenen Zahl solange mit 10 multipliziert, bis keine 
Nachkommastellen ungleich Null mehr vorhanden sind. In der folgenden Schleife Label 7 von Zeile 
091 bis 107 wird die Umwandlung des gebrochenen Anteils der Zahl Zg gemäß dem Lösungsforma- 
lismus nach Abschnitt 7.1.2 vorgenommen. 

Dabei werden die Zwischenzahlen m jeweils in STO 2 abgespeichert, so daß nach dem Verlassen 
der Schleife mit RCL 2 in Zeile 110 der Wert Zr... im X-Register vorliegt. Um das Ausgabeformat 
den von Null verschiedenen Nachkommastellen genau anpassen zu können, wird Zprac In einer an- 
schließenden Schleife Label 9 von Zeile 111 bis 124 solange mit 10 multipliziert, bis eine ganze 
Zahl vorliegt oder bereits 9 Stellen verschoben wurden. Mit der indirekten Formattierung DSP(i) 

in Zeile 126 wird das Ausgabeformat angepaßt. 
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O 
Berechnung von n 


Berechnung von m 


E_mzı=Intf2°10%} 


Zı0 = Sn, Sm+1 


Bild 7.1.2 Flußdiagramm für die Konvertierung einer Zahl mit der Basis B in eine Dezimalzahl 


Ab Label 5 beginnt die Umwandlung des ganzzahligen Anteils. Durch die Schleife Label 2 von 
Zeile 134 bis 141 wird die Anzahl der Ziffern festgestellt und im Indexregister festgehalten. In der 
Schleife Label 3 von Zeile 147 bis 160 wird der Lösungsformalismus nach Abschnitt 7.1.2 für den 
ganzzahligen Anteil abgearbeitet. Das Ergebnis wird in Zeile 170 ausgegeben. Anschließend wird 
noch die Basis 10 ausgegeben. Der strukturelle Ablauf der Rechnung ist im Flußdiagramm nach 
Bild 7.1.2 dargestellt. 

Für Zahlensysteme mit der Basis größer als zehn gelten die gleichen Umwandlungsregeln. Bei der 
Verwirklichung auf dem Rechner ergibt sich jedoch die Schwierigkeit, daß zur Darstellung einer 
Zahl nur 10 Zeichen von 0 bis 9 verfügbar sind. Zur Darstellung einer hexadezimalen Zahl mit der 
Basis 16 werden z.B. jedoch 16 Zeichen benötigt. Üblich sind hier die Zeichen 0 bis 9 für die ersten 
10 Zeichen und A bis F für die restlichen 6 Zeichen (28 im dezimalen System ergibt z.B. 1C im 
hexadezimalen System). 

Ein Ausweg aus dieser Schwierigkeit bietet sich durch die Reservierung von 2 Dezimalzeichen zur 
Darstellung einer beliebigen Zahl zur Basis B> 10. Damit können dann alle Zahlensysteme bis zur 
Basis 100 eindeutig dargestellt werden. 

Programmtechnisch ist dieses einfach dadurch zu lösen, daß die Summierspeicher für den ganz- 
zahligen Anteil (STO 0) und den gebrochenen Anteil (STO 2) mit zwei Zehnerpotenzen als Schritt- 
weite aufaddiert werden. Hierzu sind in der Anweisungsliste nach Tabelle 7.1.1 folgende Änderun- 
gen vorzunehmen: 
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Hinter der DSZI-Anweisung in Zeile 018 ist eine weitere DSZI-Anweisung einzuschieben. 
Die Konstante 9 in Zeile 028 ist durch 8 zu ersetzen. 

Hinter der ISZI-Anweisung in Zeile 060 ist eine weitere ISZI-Anweisung einzuschieben. 
Hinter der ISZI-Anweisung in Zeile 083 ist eine weitere ISZI-Anweisung einzuschieben. 
Die Konstante 10 in den Zeilen 084, 085 ist durch EEX 2 zu ersetzen. 

Die Konstante 10 in den Zeilen 095, 096 ist durch EEX 2 zu ersetzen. 

Die Konstante 10 in den Zeilen 102, 103 ist durch EEX 2 zu ersetzen. 

Hinter der DSZI-Anweisung in Zeile 106 ist eine weitere DSZI-Anweisung einzuschieben. 
Hinter der ISZI-Anweisung in Zeile 112 ist eine weitere ISZI-Anweisung einzuschieben. 
Die Konstante 10 in Zeile 113, 114 ist durch EEX 2 zu ersetzen. 

Die Konstante 9 in Zeile 117 ist durch 8 zu ersetzen. 

Hinter der ISZI-Anweisung in Zeile 135 ist eine weitere ISZI-Anweisung einzuschieben. 
Die Konstante 10 in Zeile 136, 137 ist durch EEX 2 zu ersetzen. 

Die Konstante 10 in Zeile 151, 152 ist durch EEX 2 zu ersetzen. 

Hinter der DSZI-Anweisung in Zeile 159 ist eine weitere DSZI-Anweisung einzuschieben. 


EEE 
SON 3090 on PN = 


Die geänderte Anweisungsliste ist in Tabelle 7.1.2 angegeben. Bei der Anwendung dieses Programms 
ist darauf zu achten, daß die gegebene oder gesuchte Zahl mit der Basis größer 10 je Zeichen durch 
zwei Dezimalziffern dargestellt wird. Die Dezimalzahl 28 im hexadezimalen System als 1C geschrie- 
ben, ist z.B. in der zweistellig verschlüsselten Form durch 01: 12 darzustellen. Dabei repräsentieren 
die beiden letzten Zeichen die letzte Stelle der hexadezimalen Zahl (C = 12) und das vorhergehende 
Zeichenpaar die vorhergehende hexadezimale Ziffer (1 = 01). Beim Rechnerausdruck bzw. der An- 
zeige wird die erste führende Null unterdrückt. 

Zwischen der hexadezimalen Schreibweise und der numerisch codierten Schreibweise gilt folgende 


Zuordnung: 
hexadezimal 01 PH2 14 157 9 All DE IF 
numerisch verschlüsselt 100101102 !031!041051!106107108109!101!11112113114 115 


7.1.5 Testbeispiele 


ll. Umwandlung aus dem Dezimalsystem ins oktale Zahlensystem und umgekehrt. 
Eingabe: 8 STOB 
100,0 Start Ergebnis: 144g 
Rechenzeit rund 10 Sekunden 
144, Start Ergebnis: 10050 
Rechenzeit rund 10 Sekunden 
1200, Start Ergebnis: 640,0 
640,0 Start Ergebnis: 12005 
77771777778 Start Ergebnis: 1073741823,0 
125,48; 0 Start Ergebnis: 175,365605153 
0,00375g Start Ergebnis: 0,007720947;0 
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Tabelle 7.1.2 Anweisungsliste „„Zahlensystem-Konvertierung für Basis größer zehn‘ 


Zo—Zg Bei »LELa 863 RLLI 125  x=Y? 
Bo: DSFG 864 wer | 126  STO6 
883 j 665  6T08 127 Re 
684 5) 666 RELB 128 R+ 
865  FRTA=D>Basis B67__6T0 128 x#8? 
Bas Kar 138 6709 
ee? INT 865 RCLB 131 #LBL6 
bös STOi 876 DSPB 132 DSPi 
65 LSTK 871  PRTK=DBasis 133 #LBi5 
BiE FRE 72 x 134 RCLI 
il [) 673 INT 135  ST03 
ölE STOI 674  STOI 136 6 
613  5T02 675  LSTK 137 STOI 
6i4 Key 676 FRE 138  STOB 
e15 6? 877  ST03 139  REL1 
BIE 68705 878 e 146 aLBL2 
Bir AiLBl4 678 STul 141 1821 
eis DSZI 688 STO2 142 1821 
6135 DSZI Bi x 143 EEX 
626 RCLB 062 x=8? 144 2 
621 x 883 6705 145 & 
622 FRE 864 xLBL8 146 INT 
623  LSTK 685 1521 147 X#8? 
64 INT 686 ISZI 148 6702 
625 RCLI 687 1 1485 RCLI 
BE 10% 665 EEX 156  RCLI 
B27 x 663 2 151 1 
628 ST+2 6936 STx3 152 A 
625 8 31 x 153  $T01 
0836  RELI 632 FRE 154 #LBL3 
63: CHS 653 #80? 155  RCLB 
632 x=Y? 034 6TOB 156  STx6 
033 GT 035 #LBL? 157° Rei 
634 kt 096 RCLB 158 EEX 
635 &#8? 697  $T=2 159 2 
B35  6T04 698  REL3 168 x 
037 RELI 0893  EEX i6i FRE 
0335 CHS 166 2 162  ST01 
033 LBiL6 161 5 163  LSTX 
648 5701 162 INT 164 INT 
641 DSPi 163  5T03 165  ST+6 
642 »LBL5 184  LSTK iss DSZI 
643  ST03 1685 FRE 167 DSZI 
044 [) iö6  EEX isE 6103 
845  ST0I 187 2 169 1 
645  STO6 188 x 176 6 
847 RCLI 1893 5T+2 171 LBLi 
648 xLBLB 116 DSZI 172  RÜL2 
849  RCLB iii DSZI 173  $T+8 
8586 # i12 6107 174 RELZ 
651 INT 113  RCLB 175  $T0I 
e52  ST1 114 $T#2 176  RCLE 
653  LSTK 115  RÜL2 177 SPC 
0654 FR 116 &LBL9 178 PRIS$DZ 
655  RCLB ii? 1821 179 Rt 
655 x 118  ISZI 186 DSF 
057 RCLI 118 EES 181  PRTS=DBasis 
e55  16* 126 2 182  DSPi 
853 x 121 x 183. ı Kar 
666 ST+8 122 FRC 184 SFC 
661  ISZI 123 5 1855 RS 
662 ISZI 124 RELI 
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2. Umwandlung aus dem Dezimalsystem ins Dualsystem und umgekehrt. 
Eingabe: 2 STOB 
125,38,0 Start Ergebnis: 1111101,011, 


Rechenzeit rund 25 Sekunden 


1111101,011, Start Ergebnis: 125,37540 
Rechenzeit rund 25 Sekunden 
1000000, Start Ergebnis: 6440 
64,. Start Ergebnis: 1000000, 
3. Umwandlung aus dem Dezimalsystem ins hexadezimale Zahlensystem und umgekehrt. 
Eingabe: 16 STO B (Wahl der Basis) 
1570 Start Ergebnis: 1546 
31,0 Start Ergebnis: 11546 & 1Fıg 
125,0 Start Ergebnis: 7 1346 = 7D4g 
1048576,0 Start Ergebnis: 1,00 00 00 00 0 E10, = 100000; 
10000046 = 1,E10,6 Start Ergebnis: 1048576, 0 
ABCDE7,6g = 10 11 12 13 14,6 Start Ergebnis: 703710;0 
3,540 Start Ergebnis: 3,0846 
12,05,0 Start Ergebnis: 12,00 12 12 12,6 = C,0CCCjg 
C,0CCC46& = 12,00 12 12 12,5 Start Ergebnis: 12,04998779,0 
18,05]0 Start Ergebnis: 102,00 12 12 1,6 = 12,0CCj6 
0,ABCDj« = 0,10 11 12 13,5 Start Ergebnis: 0,67109680; 0 


Für eine Umwandlung werden rund 10 Sekunden Rechenzeit benötigt. 


7.2 Code-Umwandlungen 


Analog zu der Konvertierung von Zahlen zwischen verschiedenen Zahlensystemen lassen sich auch 
Formalismen für die Umwandlung zwischen verschiedenen Codierungssystemen angeben. Voraus- 
setzung hierzu ist, daß zwischen den beiden betrachteten Systemen eine eindeutige und umkehr- 
bare Zuordnung besteht. Hierzu sollen die Gesetzmäßigkeiten einer Code-Umwandlung zwischen 
dem Dualcode und dem Gray-Code analysiert und für beide Umwandlungsrichtungen programmiert 
werden. 

Für beide Umwandlungsrichtungen zwischen einer dual codierten Dezimalzahl und der korrespon- 
dierenden Darstellung im Gray-Code ist die Zwischenschaltung der Dual-Darstellung zweckmäßig. 
Dabei lassen sich folgende, für die Programmierung besonders geeignete Formalismen ableiten [30]: 


1) Hier führt die Rückumwandlung nicht zum exakt gleichen Ergebnis, weil der Rechner bei unechten Brüchen 
nur maximal 10 Stellen verarbeiten kann. 
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1. Dezimal über Dual nach Gray-Code 


Die höchst wertigste Ziffer im Dualcode ist identisch mit der höchst wertigsten Ziffer im Gray-Code. 
Danach ist die folgende Gray-Code-Ziffer gleich 1, wenn die korrespondierende Dualziffer wechselt 
und gleich Null, wenn diese unverändert bleibt. 


Beispiel: 1000,0 = 1111101000, = 1000011100. 
Dualcode Gray-Code 


identisch 
unverändert 
unverändert 
unverändert 
unverändert 
wechsel 
wechsel 
wechsel 
unverändert 
unverändert 


DOUONER OO: area aa) 
oo--.-0000—- 


2. Gray-Code über Dual nach Dezimal 


Die höchst wertigste Ziffer im Gray-Code ist identisch mit der höchst wertigsten Ziffer im Dual- 
code. 

Danach wechselt die folgende Binärziffer der Dualzahl, wenn die korrespondierende Gray-Code- 
Ziffer gleich 1 ist und bleibt unverändert, wenn diese gleich O ist. 


Beispiel: 1001111101& = 1110101001, = 93750 


Gray-Code Dualcode 


1 identisch 1 
[0] unverändert 1 
0 unverändert 1 
1 wechsel 0 
1 wechsel 1 
1 wechsel 0 
1 wechsel 1 
1 wechsel 0 
0 unverändert 0 
1 wechsel 1 


7.2.1 Programmbeschreibung „Code-Umwandlung‘‘ 


Aus den im vorherigen Abschnitt dargelegten Formalismen bietet sich eine Programmstruktur an, 
die als Umwandlungsbrücke eine duale Zahlendarstellung benutzt. Hierzu können die im Abschnitt 
7.1 angegebenen Programme in einem speziellen Code-Umwandlungsprogramm als fertige Pro- 
grammteile gemäß der Anweisungsliste nach Tabelle 7.2.1 eingebaut werden. 
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Tabelle 7.2.1 Anweisungsliste „Dezimal-Dual-Graycode-Umwandlung“ 


655  ST+2 
662 DSP& K: Ry 
585 [) 057 xLBLi 
664  STOI 058 xer 
685 5STOB 0593  '5T03 
8865 : 866 DSZI 
887 1 861 6702 
e68 STOI 862  RCL2 
8853 Rd 663 INT 
616 R+ 664 SPC 
6ii »LöL 865 
6i2 Bö6 SPC 
613 + B67 R7 
614 IKT 
815 LSTX 669 DSPB 
eis  FRC 678 6559 
617 2 eri 1 
818 x 672  ST03 
813 1 873  RELI 
628 6 674  STO2 
B2i ST 875  ST-6 
622 R+ 076 LBL3 
823 RC 877 1 
624 x e78 8 
825  ST+6 673  $T1 
626 1521 686 RCLB 
827 Ay 881 RELI 
628  X#B° 882 5 
023  6TOB 6653 INT 
036 RCLE 884  LSTK 
631  FSE$Z, 885 FRC 
832 1 e66 RCLI 
033  ST03 687 x 
034 RÜLi 8588 STO8 
635  STO2 883 ar 
636  ST-6 898 [) 
637 xLBL2 6931  x=r? 
838 1 0932  6T04 
835 [) 0933  RCL3 
848 5T=1 894 X=8? 
641  RCLO 095  ET01 
842 RC 895 6 
645 5 697 6TO6 
644 INT 6956 &LBLI 
845 LSTK 835 1 
646 FR 188 »LBL6 
047 RCLI 161 57103 
848 x 162 xLBL4 
643 STOB 163  RCL3 
056 Key 164  RCLI 
65i RÜL3 165 x 
052  x=1? 186  5T+2 
053  ET01 167 DSZI 
654 RELI 168 6703 


PRTX=DZ 


Gray 
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Die Umwandlung einer Dezimalzahl in den Gray-Code wird mit Label A in Zeile 001 gestartet. In 
der Schleife Label O von Zeile 011 bis 029 wird die Dualzahl gebildet und in einer kurzen Pause 

in Zeile 031 angezeigt. Anschließend wird in der Programmschleife Label 2 von Zeile 037 bis 061 
der Umwandlungsformalismus abgearbeitet. Die höchst wertigste Stelle im Gray-Code wird in Zeile 
035 in STO 2 abgespeichert. In der folgenden Anweisung 036 wird mit Hilfe der Registerarithmetik 
von der Dualzahl die höchst wertigste Stelle subtrahiert. Der Vergleich der beiden vorherigen Dual- 
stellen wird in Zeile 052 durchgeführt. Der Inhalt von STO 3 bleibt unverändert, wenn die beiden 
letzten Dualziffern identisch sind. Die ermittelte Ziffernfolge im Gray-Code wird in Zeile 065 aus- 
gegeben. 

Die Umwandlung einer Gray codierten Zahl in eine Dezimalzahl wird mit Label B in Zeile 068 ge- 
startet. In einem Unterprogramm Label 9 wird zunächst die Ziffernzahl im Gray-Code festgestellt. 
Auch hier wird durch die Registerarithmetik Operation in Zeile 075 die höchst wertigste Ziffer 
abgespalten, bevor der eigentliche Umwandlungsformalismus beginnt. Dieser wird innerhalb der 
Programmschleife Label 3 von Zeile 076 bis Zeile 108 erledigt. Als Zwischenergebnis wird in Zeile 
111 die ermittelte Dualzahl in einer kurzen Pause angezeigt. Die anschließende Umwandlung von 
Dual nach Dezimal wird in der Schleife Label 5 mit den Anweisungen 122 bis 135 durchgeführt. 
Als Ergebnis wird die Dezimalzahl in Zeile 138 ausgegeben. 


7.2.2 Testbeispiele 


Eingabe: 941 (Dezimalzahl) 


Start [A]: 1. Kurze Pause: 1110101101 (Dualzahl) 

2. Stop: 1001111011 (Gray-Code) 
Rechenzeit rund 30 Sekunden 
Eingabe: 1001111011 (Gray-Code) 
Start [B]: 1. Kurze Pause: 1110101101 (Dualzahl) 

2. Stop: 941 (Dezimalzahl) 
Eingabe: 1023 (Dezimalzahl) 
Start [A]: 1. Kurze Pause: 1111111111 (Dualzahı) 

2. Stop: 1000000000 (Gray-Code) 
Eingabe: AT TRIETTT (Gray-Code) 
Start [B]: 1. Kurze Pause: 1010101010 (Dualzahl) 

2. Stop: 682 (Dezimalzahl) 
Eingabe: 50000 (Dezimalzahl) 
Start [A]: 1. Kurze Pause: 1.100001101 +15 (Dualzahl) 

2. Stop: 1.010001011 + 15 (Gray-Code) 


Rechenzeit rund 45 Sekunden 


Die letzten beiden Ergebnisse geben die ersten 10 Ziffern der 16-stelligen (Exponent + 1) Dual- 
bzw. Gray-codierten Zahl an. 

Führt man durch Betätigung der Starttaste anschließend die Umwandlung in umgekehrter 
Richtung durch, so erhält man als Dezimalzahl den Wert 49984. Diese Zahl würde im Gray-Code 
1010001011100000 entsprechen. Hierbei ist zu beachten, daß 1010001011000000 im Gray-Code 
als Dualzahl 1100001101111111 = 50047 Dezimal ergeben würde. Da jedoch alle Ziffern über 10 
hinaus identisch Null interpretiert werden, liegt der Umwandlung die Dualzahl 
1100001101000000 = 49984 zugrunde. 
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7.2.3 Gray-Code-Abtaster 


Bei Systemen zur digitalen Weg- und Winkelmessung mittels Winkelcodierern benötigt man zur Ver- 
meidung von Zahlensprüngen zur Ausschaltung kleiner Justierfehler der Abtasteinrichtung einen 
Zahlencode, bei dem sich beim Übergang von einer Zahl zur nächsten immer nur ein einziges Bit 
ändert (Einschrittiger Code). Diese Eigenschaft zeichnet den Gray-Code nach Bild 7.2.1 aus [31]. 
Der funktionelle Aufbau einer Abtastbahn ist in Bild 7.2.1, die technische Realisierung einer 
Gray-codierten Abtastscheibe ist in Bild 7.2.2 gezeigt. 


a Xp 


‚Abtaster 
9 10:1111211341516:17 1819120... 


Bild 7.2.1 Aufbau einer Abtastbahn im Gray-Code Bild 7.2.2 Gray-codierte Abtastscheibe 


7.2.4 Direkte Umwandlung Dezimal in Gray-Code 
Zwischen der Anzahl der abzutastenden Positionen Z und der hierzu erforderlichen Anzahl Codier- 
spuren n besteht die Beziehung: 

Z=2" (7.2.1) 
Aus Gl. (7.2.1) folgt für die erforderliche Anzahl Codierspuren: 


(7.2.2) 


Mit Gl. (7.2.2) ist die Spur mit der am weitesten links stehenden 1 festgelegt. Allgemein gilt, daß 
die n-te Spur bei der beliebigen Position X, „1‘'-Signal liefert, wenn X, in folgendem Bereich liegt: 


(1+4K) 277 <X,<(3+4K) 2°" -1 (7.2.3) 


mit k>0 und ganzzahlig. 

Mit diesen Überlegungen ist die Basis für die Erarbeitung des zyklischen Ablaufs gelegt. Der als 
Endergebnis gesuchte Gray-Code der gegebenen Dezimalzahl Z soll über das X-Register mit maximal 
zehn Ziffern angezeigt werden. Hierzu ist es notwendig, die einzelnen errechneten Gray-Code-Ziffern 
nacheinander mit abnehmender Wertigkeit dezimal zu wichten und in einem Zwischenspeicher auf- 
zuaddieren. Als erstes dezimal gewichtete Gray-Code-Ergebnis entsteht die Zahl 


Kae 10° 1 (7.2.4) 
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Hiernach wird eine neue Position x ermittelt, die angibt, wie weit die gegebene Position X, von 
der unteren Grenze des Intervalls nach GI. (7.2.3) für k = O entfernt ist. 


Ko 2, (7.2.5) 
Eine logische Abfrage der Form: 
X, +1 >27 (7.2.6) 


liefert im Falle ‚ja‘ den Hinweis, daß die nächste Gray-Code-Ziffer eine Null sein muß. Damit ist 
keine Addition zu dem bisherigen Wert von X. erforderlich. Im Fall „‚nein‘‘ muß ein neues X& 
der Form: 


Xa.=Xa +:10%7° (7.2.7) 
gebildet werden. Außerdem muß ein neues x nach folgender Beziehung ermittelt werden 
A a (7.2.8) 


Der Rechnungsablauf ist im Flußdiagramm 
nach Bild 7.2.3 verdeutlicht. 


Bild 7.2.3 
Flußdiagramm Dezimal-Gray-Code-Umwandlung 


7.2.5 Programmbeschreibung „Dezimal-Gray-Code-Umwandlung” 


Die Anweisungsliste zu dem Programm ist in Tabelle 7.2.2 angegeben. Das Programm wird mit 
Label A in Zeile 001 gestartet. Der im X-Register eingegebene Wert wird in Zeile 003 nach STO 2 
zwischengespeichert. Mit den Anweisungen 004 bis 011 wird die GI. (7.2.2) ausgewertet, die erfor- 
derliche Anzahl Codierspuren ermittelt und mit einer kurzen Pause in Zeile 016 angezeigt. 
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Tabelle 7.2.2 Anweisungsliste „Dezimal-Graycode-Umwandlung‘ 


Zi —Gray ööl »ibLA 6i7 6 6354 6T0i 
862 üsre sis STOI 625 RELB 
ee STOZ 615  RCLB 636 1 
804 Lö& 828 18* 637 S 
885 £ 621 STOl 835 16* 
886 LOG 622 &LBLZ 835 ST+i 
ser ® 823 2 648 REL3 
668 EEX 624 RCLB 841 i 
689 CHS 825 x 842 = 
ele & 6256 5STO3 845 RCLZ 
8il # ber ST-2 844 = 
6iz INT BZE 2 645 STO2 
#613  STOB 623 ® 846 »LBLi 
614 1 036 RLÜLZ 847 DSZi 
615 + 831 1 045 6702 
dis FSE=D>n Code-Bahnen 832 + 845  RCLI 

833 817 856 R/S=D>Gray-Code 


Der Rechenfehler bei Auswertung der Gl. (7.2.2) kann in der Größenordnung von 2: 10°° liegen. 
Aus der Beziehung (log 256)/(log 2) bildet der Rechner z.B. als Ergebnis 7,999999998 statt dem 
exakten Ergebnis 8,0. Diese Ungenauigkeit kann bei nachfolgenden Integer-Operationen zu völlig 
falschen Ergebnissen führen, wenn an Stelle des exakten Integer-Wertes 8 mit dem falschen Integer- 
Wert 7 weiter gerechnet wird. Um diese Fehler an den Dualsprüngen zu vermeiden, wird in den Zei- 
len 008 bis 011 ein Korrekturwert 10°® zu dem Ergebnis aus GI. (7.2.2) addiert. 

Eine äußere Programmschleife umfaßt die Anweisungen von Zeile 022 bis 048. Innerhalb dieser 
Schleife werden die Gin. (7.2.5 bis 7.2.8) ausgewertet. Die Schleife wird verlassen, wenn der Inhalt 
von STO 0 auf Grund der Dekrement-Anweisung in Zeile 047 gleich Null geworden ist. Das im Gray- 
Code vorliegende Ergebnis wird angezeigt. Für Dezimalzahlen bis 1023 werden alle Ziffern im Gray- 
Code ausgegeben. Über diesen Zahlenbereich hinaus, schaltet der Rechner automatisch auf Exponen- 
tial-Format-Ausgabe um, so daß nur die ersten zehn Ziffern im Gray-Code der Anzeige entnommen 
werden können. 


7.2.6 Testbeispiel 


Die in den Gray-Code umzusetzende Zahl Z wird über die Eingabetastatur in das X-Register einge- 
geben (1 <Z</ 1024). Bei Überschreitung des angegebenen Zahlenbereiches gibt die auf 10 Stellen 
begrenzte Anzeige die zehn höherwertigsten Gray-Code-Stellen an. 


Eingabe: Z= 937 Start 
Ergebnis: In einer kurzen Pause wird mit n = 10 die Anzahl der Codierspuren angezeigt. Der 
Rechengang hält mit dem Gray-codierten Ergebnis an X = 1001111101 


Rechenzeit rund 20 Sekunden 
Eingabe: Z=1500000 Start 


Ergebnis: n= 21 (kurze Pause) 
Als Endergebnis wird 1.110110010 + 20 angezeigt. Die ersten 10 Ziffern der Gray- 
codierten Zahl lauten daher 1110110010. 


Rechenzeit rund 40 Sekunden 
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Anhang Einkommensteuerberechnung für Österreich 


1 Gesetzliche Grundlagen 


Im Österreichischen Einkommensteuergesetz ESTG von 1972 nach dem Stand von 1978 ist der 
Einkommensteuer -Tarif als Zonentarif für 11 Zonen zu versteuernder Einkommenbeträge in 8 33 
formuliert: 


111. TARIF 
Steuersätze und Steuerabsetzbeträge 


8 33. (1) Die Einkommensteuer von dem zu versteuernden Einkommen beträgt jährlich 


für die ersten 50.0008 0er u erstere a ea az Det erregen 23v.H. 
für die weiteren 50.0008. K a a ano aaa nl ana aa era ee 28 v.H. 
für die weiteren 50.0008: 3 Aha ae ae ee ae ara 33 v.H. 
für die weiteren 50.0008. 4.2 22 2a en ir Fee ar ae see 38 v.H. 
für die weiteren A0:00018.. ea le Base feene Sr aaa nee nr 43 v.H. 
für die weiteren AO ee ee er eh 48 v.H. 
für die weiteren 40.0005; : 22 00. aaa m en a Ren Klee ER 52 v.H. 
für die weiteren 18000038, Sr. on are en ee ee te en DE Er unT 55 v.H. 
für die weiteren BUNODDIST.. - Nenn er tneahn ar es a er Serena De aite er Bier are eeeeere 58v.H. 
für die weiteren 500.0005 7 4.24 00: samen ea ame nee ne nee 60 v.H. 
Tur-alle Welteren/Betrage... “ars aa ersieseuecansete m ar Bun arnaeee ara artannel ante. Me ee ra ie 62 v.H. 


(2) Wenn das zu versteuernde Einkommen nicht durch 100 S teilbar ist, so sind Restbeträge bis 
einschließlich 50 S zu vernachlässigen und Restbeträge von mehr als 508 als volle 1008 zu rechnen. 


(3) Dem Steuerpflichtigen steht ein allgemeiner Steuerabsetzbetrag in Höhe von 4.400 S jährlich zu. 
(4) Ein Alleinverdienerabsetzbetrag in Höhe von 2.400 S jährlich ... 
(5) Ein Arbeitnehmerabsetzbetrag in Höhe von 2.000 S jährlich ... 


(8) Die Einkommensteuer wird nicht erhoben, wenn sie den Betrag von 300 S nicht übersteigt. 
Übersteigt die Einkommensteuer den Betrag von 300 S, dann wird sie 


bis zu einem Betrag von 350 S mit 150 S, 
bis zu einem Betrag von 400 S mit 200S und 
bis zu einem Betrag von 450 S mit 300 S 


erhoben. 
Nach dem Stand vom 1. Januar 1979 [1] gelten für die Absetzbeträge ab 1979 folgende erhöhten 
Werte: 


Allgemeiner Steuerabsetzbetrag (8 57 Abs. 1) jährlich 4.800,— S 
Alleinverdienerabsetzbetrag (8 57 Abs. 2) jährlich 3.200,— S 
Arbeitnehmerabsetzbetrag (5 57 Abs. 3) jährlich 3.000,-— S. 


In der Jahresausgleichstabelle sind neben den Absetzbeträgen der Werbungskostenpauschbetrag 
von 4.914,— S und der Sonderausgabenpauschbetrag von 3.276,— S berücksichtigt. 
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2 Programmbeschreibung 


Das Programm umfaßt 158 Anweisungszeilen. Es kann über vier Startadressen Label b, Label B 
für Alleinverdiener-Abzugsberechtigte (verheiratete) und Label e, Label E für Ledige gestartet 
werden. Bei Aufrufe über die Label B oder b wird der Alleinverdiener-Absetzbetrag aus STO 6 
berücksichtigt. Bei Aufrufe über die Kleinbuchstaben werden alle Absetzbeträge und der Werbungs- 
kostenpauschbetrag aus STO 7 sowie der Sonderausgabenpauschbetrag aus STO 8 berücksichtigt. 
Für individuelle Werbungs- oder Sonderausgabenbeträge müssen diese vor dem Programmstart 
nach STO 7 bzw. STO 8 mit negativem Vorzeichen abgespeichert werden. Über die Startadressen 
Label b und Label e werden die Lohnsteuerbeträge der Jahresausgleichstabelle [1] aus Spalte 2 
und 3 exakt berechnet. Die Aufsummierung der Steuerbeträge in den einzelnen Tarifzonen wird 
mit Hilfe der indirekten Adressierung mit den Anweisungen zwischen Label a in Zeile 054 und der 
Rücksprunganweisung GTO a in Zeile 075 durchgeführt. Für die Abspeicherung der Tarifzonen 
und der zugehörigen Steuersätze wird nur jeweils ein Speicherplatz benötigt. Dazu werden die 
Steuersätze hinter dem Komma an die Zonenwerte angehängt. Die Separierung der beiden Zahlen- 
werte wird über die Funktionen Int und Frac innerhalb der Programmschleife Label a erreicht. 


In einer kurzen Pause wird der auf volle hundert Schilling gerundete, zu versteuernde Einkommens- 
betrag angezeigt. Bei der Rundung wurde berücksichtigt, daß bei 50 S nicht aufgerundet sondern 
noch abgerundet wird. Die in 8 33 Ziffer 8 gegebenen besonderen Berechnungsregeln für kleine 
Einkommen werden mit den Anweisungen von Zeile 084 bis 124 realisiert. Als Merkmal für die 
reine Einkommensteuerberechnung durch Start über die Großbuchstaben B oder E wird das Flag2 
gesetzt. Dadurch wird die Berechnung der gerundeten Monatsbeträge in den Zeilen 128 bis 140 
übersprungen. Als Ergebnisse werden der vorgenannte Einkommensbetrag in S, der Spitzensteuer- 
satz in %, der Durchschnittssteuersatz in % und der Steuerbetrag in S ausgegeben. 


3 Speicherplatzbelegung 


Das Programm benötigt einen permanenten Datensatz, in dem die Konstanten des Einkommen- 
steuertarifs abgespeichert sind. Diese Daten werden über eine Datenkarte mit folgender Ordnungs- 
struktur zur Verfügung gestellt: 


Primärspeicher Sekundärspeicher 

Jahr sSTo0': 50.000,23 

1978 1979 sTo 1": 50.000,28 

STO 4: sSTo 2. 50.000,33 
STO5: sSTo 2 50.000,38 
STO 6: sSTO e 40.000,43 
STO 7: sSTo an 40.000,48 
STO 8: STO : 40.000,52 
STO9: sto 7% 180.000,55 


STO 8: 500.000,58 
STO 9: 500.000,60 


[1] Lohnsteuertabellen 1979, Verlag der Österreichischen Staatsdruckerei 
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4 Beispiele (1978) 


1. Jahresiohn 37.640,— S 
Eingabe: 37640 
Start d.h. nicht Alleinverdienerabsetzberechtigt 


Ergebnisse: Einkommensbetrag (T) 37.640,00 S 
Spitzensteuersatz (Z) 23,00 % 
Durchschnittssteuersatz (Y) 0,53 % 
Steuerbetrag (X) 200,40 S 


Rechenzeit rd. 15 Sekunden 


Eingabe: 37640 
Start d.h. Alleinverdienerabsetzberechtigt 


Ergebnisse: Einkommensbetrag (T) 37.640,00 S 
Spitzensteuersatz (Z) 23,00 % 
Durchschnittssteuersatz (Y) 0,00 % 
Steuerbetrag (X) 0,008S 


2. Jahreslohn 240.000,—- 5 
Eingabe: 240000 
Start d.h. nicht Alleinverdienerabsetzberechtigt 


Ergebnisse: Einkommensbetrag (T) 240.000,00 S 
Spitzensteuersatz (Z) 43,00 % 
Durchschnittssteuersatz (Y) 28,45 % 
Steuerbetrag (X) 68.274,00 S 


Eingabe: 240000 
Start d.h. Alleinverdienerabsetzberechtigt 


Ergebnisse: Einkommensbetrag (T) 240.000,00 S 
Spitzensteuersatz (Z) 43,00 % 
Durchschnittssteuersatz (Y) 27,45% 
Steuerbetrag (X) 65.874,00 S 


Rechenzeit rd. 15 Sekunden 
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Tabelle 1 Anweisungsliste „Einkommensteuerberechnung Österreich” 
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HEWLETT Ku PACKARD 


erstellt. Aus den verschiedensten Fachbereichen ausgewählt und von durchweg 
hohem Anforderungsniveau, dokumentieren diese Programme beispielhaft die viel- 
seitigen Einsatzmöglichkeiten und den hohen technischen Standart der Rechner 
HP-67 und HP-97. Zusammen mit der bewährten Computer-Logik UPN, der ein- 
fachen Programmierung und dem anspruchsvollen Qualitätsmaßstab, den HEWLETT- 
PACKARD an alle seine Produkte anlegt, stehen so dem Anwender Rechner zur 
Verfügung, die im besten Sinne benutzerfreundlich sind. 

Aber HEWLETT-PACKARD bietet noch mehr. Ergänzend zu den Rechnern liegt 
ein umfassendes Software-Angebot von mehr als 3000 weiteren Programmen aus 
Wirtschaft, Wissenschaft und Technik in praxisgerechter Form vor. Damit eröffnet 
sich den Benutzern von HEWLETT-PACKARD-Rechnern die Möglichkeit, die 
individuellesten Problemstellungen gezielt anzugehen und einer schnellen und 
exakten Lösung zuzuführen. 


Baustatik: 

Umfangreiche Programmsammlung in 
DIN-Norm von Ing. (grad.) W. Mücke 
und Dipl.-Ing. H. Weckmann 


Bauphysik: 

Zahlreiche Programme für Heizungs-/ 
Klimatechnik und Akustik von 

Ing. (grad.) H. Markert 


Bank, Sparkassen und Finanzbereich: 


Braess/Fangmeyer „Elektronische 
Effektivzinsberechnung” für Renditen, 
Kurse und Konditionen bei 


® Annuitätendarlehen (Tilgungs- 
darlehen, Zinsanpassungsdarlehen) 


Darlehen und Wertpapiere mit 
Ratentilgung (Tilgungsdarlehen, 
Zinsanpassungsdarlehen) 


Festdarlehen und gesamtfällige 
Wertpapiere (auch U-Schätze) von 
Dipl. Mathematiker H. Fangmeyer 
und Bankkaufmann A. Beer. 


Anwendung programmierbarer 
Taschenrechner 


Band 1: Angewandte Mathematik, 
Finanzmathematik 
Informatik, Statistik — 
für UPN-Rechner 


von Dr.-Ing. Helmut Alt 
Verlag Vieweg 
Braunschweig/Wiesbaden 1979 


Arbeitsvorbereitung und Kalkulation: 
Programme aus den Bereichen Bohren, 
Drehen, Fräsen, Zeitwirtschaft und 
Kostenkalkulation von Industrial 
Engeneer H. P. Schoth 


Geodäsie: 


Ingenieurvermessung, Landesvermessung, 


Photogrammetrie, Ausgleichsrechnung 
von Prof. Dr. Oberete-Brink-Bockholt 


Umfangreiche Software 
aus unserem Hause: 


Statistik — Maschinenbau* — Finanz- 
mathematik — Elektronik — Spiele* — 
Vermessung — Navigation* — Nuklear- 
medizin 


„Users-Club’ für Programmaustausch: 
Der HP Users-Club zählt über 5000 Mit- 
glieder. Es gibt über 1000 Programme. 
Zusätzlich stehen 40 neue Programm- 
sammlungen* mit jeweils 10 bis 15 
Programmen, ohne Magnetkarten, 
unterschiedlicher Sachgebiete zur 
Verfügung. 


* Diese Programme sind nur in englisch 
erhältlich. 


Adressenliste: 


Weitere Programmsammlungen von 
Anbietern der verschiedensten Fach- 
richtungen auf Anfrage. 


HP-Taschenrechner System Befeld: 


Für Einsatz in explosionsgefährdeten 
Räumen (Schutzart G 5) 


Fordern Sie weitere Informationen beim Fachhandel an oder direkt bei: 


Hewlett-Packard GmbH/Vertrieb, Berner Straße 117, 
6000 Frankfurt 56, Tel. (0611) 5004-1 
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Info-Gutschein 


Bitte informieren Sie mich (uns) ständig über Ihre 
Neuerscheinungen auf dem Gebiet: 


U] Taschenrechner [] Mikrocomputer 
Ich (wir) besitze (n) folgendes Gerät: 
TR: 


uC: 


Hauptanwendungsgebiete des TR bzw. uC: 


Diese Karte entnahm (en) ich (wir) dem Buch: 


Meine (unsere) Buchhandlung: 


Gleichzeitig bestelle (n) ich (wir) folgende Bücher: 


Autor und Titel 


Schumny, TR + uC-Jahrbuch 1980 


Anschrift: 


Beruf /Branche 


Datum Unterschrift 


Friedr. Vieweg & Sohn Verlagsgesellschaft mbH : Wiesbaden 


19H 9 1 aan I HU WBHHWDUUIBABAIFINHUHIUHHIIIHIDIUGIIIIIHIHIHIHIHIHHHHIHHIHIHHTHTIIIIINIIII IH Id 1 2 9393 


Lieber Leser! 


Wenn Sie Interesse haben, aktiv an der 
Weiterentwicklung unseres Literaturprogramms 
zum Bereich TR + uC mitzuarbeiten, z.B. durch 
Veröffentlichung ausgetesteter Programme zu 
bestimmten Anwendungsgebieten, dann schreiben 
Sie uns. 


Wir freuen uns über Ihre Nachricht und werden 
uns umgehend mit Ihnen in Verbindung setzen. 


Mit freundlichem Gruß 
Lektorat Fachbuch 
gez. Niclas 


Bitte 
mit 


50 Pf. 
freimachen! 


Antwort 


Friedr. Vieweg & Sohn 
Verlagsgesellschaft mbH 


Postfach 5829 


D-6200 Wiesbaden 1 


Weitere Literatur für Benutzer 
elektronischer Taschenrechner 


Taschenrechner Handbuch — Naturwissenschaften/Technik, 
von H. Schumny 

Allgemeine Anleitung zur Auswahl und zum Gebrauch 

elektronischer Taschenrechner 


in der Reihe: ‚Programmieren von Taschenrechnern”’ 
sind erschienen: 


Band 1 Lehr- und Übungsbuch für den SR 56, 

Band 2 Lehr- und Übungsbuch für den TI-57, 

Band 3 Lehr- und Übungsbuch für den TI-58 und TI-59, 
von Hans Heinrich Gloistehn 

Band 4 Lehr- und Übungsbuch für die Rechner 

HP-29C /HP-19C und HP-67/HP-97, von Paul Thießen 


Grundlegende Einführung in die Programmiertechnik für bestimmte 
Rechnertypen mit Beispielen aus der Mathematik und der Technik 


Differentialgleichungen der Elektrotechnik, von K.Hoyer 
und G. Schnell 

An Beispielen aus der Elektrotechnik wird neben den klassischen 
Lösungsverfahren besonders die numerische Berechnung mit 
programmierbaren Taschenrechnern dargestellt 


Taschenrechner + Mikrocomputer Jahrbuch, herausgegeben 
von H. Schumny 


Anwendungsbereiche — Produktübersichten — Programme — 
Entwicklungstendenzen — Tabellen — Adressen 


Arbeits- und Aufgabenbücher für Lehrer und Schüler 
der Sekundarstufe: 


Programmierbare Taschenrechner in Schule und Ausbildung, 
von U. Bromm 


Elektronische Taschenrechner in der Schule, 
von A. Wynands und U. Wynands 


Vieweg 


Anwendung programmierbarer Taschenrechner 


Band 1: Angewandte Mathematik — Finanzmathematik 
Statistik — Informatik 
für UPN-Rechner 


von Helmut Alt 


Band 1 der Reihe Anwendung programmierbarer Taschenrechner führt in die 
Programmiertechnik von Rechnertypen ein, die nach dem Prinzip der Umgekehrten 
Polnischen Notation (UPN) arbeiten, und enthält zahlreiche ausgetestete Programme 
zu Aufgabenstellungen aus den Bereichen der angewandten Mathematik, der Finanz- 
mathematik, der Statistik und der Informatik. 


Eine kurze Einführung in die Theorie der verschiedenen Problemstellungen ver- 

deutlicht die Herleitung des Lösungsalgorithmus. Jedes Programm-Beispiel wird 

ausführlich kommentiert und enthält wertvolle Programmierungshinweise für die 
Ausarbeitung eigener Programme. 


Dr.-Ing. Helmut Alt ist Mitarbeiter der Rheinisch-Westfälisches Elektrizitätswerk AG 
(RWE), Betriebsverwaltung Düren. 


ISBN 3-528-04150-1 


